On Jun 30, 2014, at 2:44 AM, Uday Vernekar <vernekaru...@gmail.com> wrote:
> please Explain
>
> next if $line =~ /^-/;
“Skip this input line if it starts with a dash ‘-‘ character.”
> my @f = split('\s*\|\s*',$line);
"Break the input line into files separated by the vertical pipe character ‘|’
and any whitespace before or after the pipe character, i.e., don’t include the
whitespace in the extracted fields."
> next unless scalar @f == 8;
“Skip this input line unless it consists of exactly 8 fields.”
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
