Help for this page

Select Code to Download

Select or download this
```
print <<qq~DOUBLE~;
$foo
DOUBLE
```

Select or download this

my @list = (<<HERE, <<THERE, <<EVERYWHERE);
cluck, cluck
...
EVERYWHERE

print "with a ", shift @list, "and a ", shift @list, "singing ", shift
+ @list;