Could someone please break this down,
I am not sure how to read this:
m#^/\*# .. m#^\*/#; # using the range operator
match (# is the delimiter)
at the start of a line /\* (and this where I lose it!)
Frm Jason King
#!perl -w
use strict;
open FILE, 'Cfile' or die "Bad open: $!";
while(<FILE>)
{
next if m#^/\*# .. m#^\*/#; # using the range operator
print; # we're just printing for testing
}
__END__
----Thanks-----
Dave
- Re: m#^/\*# .. m#^\*/#; David Gilden
- Re: m#^/\*# .. m#^\*/#; Jeff 'japhy' Pinyan
