Select Code to Download

   #!/usr/bin/perl
   2: 
...
  15:    print $_;
  16: }
  17: close FILE;

#!perl -w
...

close FILE;