perl Heredoc2021-07-01 本文已影响0人 qujingtao example: ``` #!/usr/bin/perl -w use strict; my $array=<<'EOF' XXX ... EOF print $array; ```