点击运行
#!/usr/bin/perl $a = 10; $var = <<"EOF"; 这是一个 Here 文档实例，使用双引号。 可以在这输如字符串和变量。 例如：a = $a EOF print "$var\n"; $var = <<'EOF'; 这是一个 Here 文档实例，使用单引号。 例如：a = $a EOF print "$var\n";
运行结果 :
正在执行...
