in reply to how to skip certain lines and check for blank ones?
first of all, read perlre.
a code that may suit your purpose might be something like:
my $INFILE_file_name = 'your_file'; open my $INFILE, '<', $INFILE_file_name or die "$0 : failed to open input file $INFILE_file_name : $ +!\n"; while (<$INFILE>){ next if ( m{ \A \s* # }x); ... your code here ... } close $INFILE or warn "$0 : failed to close input file $INFILE_file_name : $ +!\n";
HTH,
Mickey
|
---|
In Section
Seekers of Perl Wisdom