RE:Regex problem

[Jorge Goncalvez]

Hi, I have this code:

$_Globals{IPCONFIG} = "C:/ipconfig.txt";

 open (IPCONF,"< $_Globals{IPCONFIG}") or die "je ne peux ouvrir 
$_Globals{IPCONFIG} :$!";
    @ten=<IPCONF>; close IPCONF;
    foreach(@ten){
        chomp();
        
        if ($_ =~/Adresse IP/) {
            $_ =~ s/.+://;
            
            $_ =~ s/\d+$/0/;
            
            print $_;
            push @IP, $_;

                }
        }
        
In this case $_ semms to memorise the first regex but not the second .Why?      


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]