Δημοσιεύτηκε: 24 Φεβ 2013, 23:28
από simosx
SAMSONIC έγραψε:
Πως γίνεται να βρούμε μια λέξη μέσα σε ένα αρχείο κειμένου και αφού βρεθεί αυτή η λέξη να τυπωθεί στην οθόνη μια άλλη λέξη που θα βρίσκεται στην ίδια γραμμή ή σε κάποια επόμενη?

π.χ. το κείμενο είναι:

μπλα μπλα μπλα λέξη μπλα μπλα μπλα μπλα μπλα 24/02/2013 μπλα μπλα μπλα

και να τυπώνεται η ημερομηνία.


Με Perl

Μορφοποιημένος Κώδικας: Επιλογή όλων
if ( m/λέξη/ ) 
{
if ( m/(\d+)\/(\d+)\/(\d+)/ )
{
print "Βρέθηκε ημερομηνία: $1-$2-$3\n";
}
}