re:problem with regexp

Hi list i have this snippet: $Ajout=1; while () { 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; } } althou

Re:regexp needed

Hi List , I have this to print: 1 2 3 with this script but it didn't work: #!/usr/bin/perl use strict; use warnings; { local $/; my $file = ; while ($file =~ /^\s+(\d+).(.+)$/) { print $1\n if $2 =~ /extractStat/; } } __DATA__ ?tatID Jour

Re: NT at command

Hi List, i have a perl script that adds some Nt at commands but the problem is how can i do to prevent my script to not delete old tasks defined in at. Thanks . -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re:seach a number in a file

Hi, I have a text file like this: 1 Chaque L Ma Me J V S D 00:20 D:\muse\lotus\notes\extractStat.exe StatA090 j 2 Chaque L Ma Me J V S D 00:21 D:\muse\lotus\notes\extractStat.exe StatA090 m 3 Chaque L Ma Me J V S D 00:22 D:\muse\lotus\notes\extractStat.exe StatA090