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 h
        4   Chaque L Ma Me J V S D  00:23
D:\muse\lotus\notes\extractStat.exe StatB090 j
        5   Chaque L Ma Me J V S D  00:27
D:\muse\lotus\notes\extractStat.exe StatPMF090 m
        6   Chaque L Ma Me J V S D  00:28
D:\muse\lotus\notes\extractStat.exe StatPMF090 h
        7  Aujourd'hui                          20:00
D:\muse3\test.exe
        8   Chaque L Ma Me J V S D  00:28
D:\muse\lotus\notes\extractStat.exe StatPMF090 h

How can i do in Perl to get the first number if the last part of the
line doesn't contains extractStat.
for exemple here to get only the number 7.

Thanks

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to