Select Code to Download

if(open (my $filehandle, '<', '/home/cowpensv/public_html/cgi-bin/bloc
+k.txt')) {
   my $comments = $FORM{'comments'};
...
   die "Can't open block.txt"; # or any other error-handling
   # i don't like die in a cgi-env
}