Harald wrote:
> Hi,

Hello,

> I need to parse an ASCII file which first rows are comments. Those rows
> are marked by a '#' at their beginning.

You need to use '^' instead of '\' to indicate the beginning of a line.

> I try to filter them out by
> 
>    while( <$FH> =~ m{\#*} )
>    {}
> 
> But this does not work. The loop does never stop.
> What goes wrong? I am really confused!

Your pattern says to match zero or more of the '#' character and every line in
your file has at least zero '#' characters.  You want something like:

1 while <$FH> =~ /^#/;



John
-- 
use Perl;
program
fulfillment

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to