Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w

...
print <<IMPLIED;
$foo
IMPLIED
  2. or download this
    $foo
date
Wed Jun 20 15:33:51 PDT 2001
date
  3. or download this
    my @list = <<qw(HERE);
Foo Bar Baz
HERE
  4. or download this
    my @list = qw <<HERE;
  5. or download this
    my @list = qw(<< HERE);
Foo Bar Baz
HERE
  6. or download this
    my $bar = <<HERE;
Foo Bar Baz
HERE
my @list = qw($bar);