in perl, depending on how strictly you want to enforce the format of the
TF0220 (in this case, just any string between 'End of' and 'at'.
#!/usr/bin/perl
use warnings;
use strict;
my $string = q|*** End of TF0220 at Thu Jul 2 10:06:51 EST 2009 -
RC = 0|;
my ($var) = $string =~ /End\s+of\s+([\w\d]+)\s+at/;
print $var if $var;
Dean
Kyle wrote:
Hi Folks,
I am trying to extract a substring from a string found in a file.
The string is: *** End of TF0220 at Thu Jul 2 10:06:51 EST 2009 -
RC = 0
and the substring I want to extract is TF0220. This is a program name
and the length of this name varies. In other words I want to extract
whatever is between the words "of" and "at" in a script.
How would I likely go about that please?
--
http://fragfest.com.au
--
SLUG - Sydney Linux User's Group Mailing List - http://slug.org.au/
Subscription info and FAQs: http://slug.org.au/faq/mailinglists.html
