Freek de Kruijf writes:
> Hi,
>
> I am trying to understand fully a perl program with the following lines:
>
>} elsif( /^(\#?\s*(?:pickup|qmgr)\s+)(?:fifo|unix)(\s+.*)/ ) {
> if( defined $normalize->{$1} ) { next; } else { $normalize->{$1} = 1; }
> I do understand the first line, but
} elsif( /^(\#?\s*(?:pickup|qmgr)\s+)(?:fifo|unix)(\s+.*)/ ) {
if( defined $normalize->{$1} ) { next; } else { $normalize->{$1} = 1;
}
if the string starting at the beginning of the line matches, $1 will
contain "zero or one #, zero or more whitespaces, either the word "pickup"
or "qmgr", o
Hi,
I am trying to understand fully a perl program with the following lines:
} elsif( /^(\#?\s*(?:pickup|qmgr)\s+)(?:fifo|unix)(\s+.*)/ ) {
if( defined $normalize->{$1} ) { next; } else { $normalize->{$1} = 1; }
I do understand the first line, but I can not find what the second line is