Hi list
i have this snippet:
....
$Ajout=1;
while (<FIC>)
{
print "\n$DCICLIENTDIR\\logicalPMF.exe -f
$DCICLIENTDIR\\config$NOM_PMF.cfg\n";
print ($_);
my $var1="$DCICLIENTDIR\\logicalPMF.exe -f
$DCICLIENTDIR\\config$NOM_PMF.cfg\n";
my $line=($_);
if ($_ =~ m /$var1/)
{
$Ajout=0;
}
}
althought in the console i have this:
D:\muse\lotus\notes\logicalPMF.exe -f D:\muse\lotus\notes\config.cfg
D:\muse\lotus\notes\logicalPMF.exe -f D:\muse\lotus\notes\config.cfg
-pmfType Logical -id
$Ajout=1 always. the if never match the patern $var1.
Thanks for your help.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
