Select Code to Download

knoppix@Microknoppix:~$ perl -E '
> open my $fh, q{<}, \ <<EOD or die $!;
...
7  r r r
8  r r r
knoppix@Microknoppix:~$