Posted By: Micval (vladce pocasi) on 'CZscripts'
Title:     Re: Perl problem
Date:      Thu Apr 25 08:08:12 2002

> Ahoj,
> zacinam s Perlem a hned jsem narazil na problem. Mohl by mne nekdo prosim 
> objasnit, proc toto funguje
> if ( $line =~ /s*^LocalNetworks*(.+)/ )
> ale toto ne?
> $item = 'LocalNetwork';
> $regexp = '/s*^'.$item.'s*(.+)/';
> if ( $line =~ $regexp )

imho proto, ze $regexp neni regularni vyraz, ale retezec obsahujici cosi, co 
jako regularni vyraz vypada

zkus
$regexp = '^s*'.$item.'s*(.+)';
if($line =~ /$regexp/)

nebo
if($line =~ /^s*$items*(.+)/)

>  Diky
>   ntw


This post was conceived, written and performed by micval

And now for something completely different..
                                  THE END