Strip block comments: Difference between revisions
no edit summary
(C.f: Strip comments from a string) |
No edit summary |
||
Line 186:
open( FH , "<" , "samplecode.txt" ) or die "Can't open file!$!\n" ;
my $code = "" ;
{
$code = <FH> ; #slurp mode
}
close FH ;
| |||