parsing

[Chris Radcliff]

~sdpm~

Steve Meier wrote:
> can anyone help me with regular expressions!!
> 
> Here is the string:          4129280 bytes sent in 3.62 seconds (1142.26
> Kbytes/sec)
> 
> I need:    1142.26 out of it.
> 

<perl>
my $string = '4129280 bytes sent in 3.62 seconds (1142.26 Kbytes/sec)';

my $result;
if ($string =~ /\((.+?)\s/) {
	$result = $1;
}
print qq{The result is $result.\n};
</perl>

Basically, you're looking for stuff between the first ( and the next
space after that. By enclosing it in parentheses, Perl stores it in $1;
if you had another set of parentheses the result would be stored in $2,
etc.

~chris
~sdpm~

The posting address is: san-diego-pm-list at hfb.pm.org

List requests should be sent to: majordomo at hfb.pm.org

If you ever want to remove yourself from this mailing list,
you can send mail to <majordomo at happyfunball.pm.org> with the following
command in the body of your email message:

    unsubscribe san-diego-pm-list

If you ever need to get in contact with the owner of the list,
(if you have trouble unsubscribing, or have questions about the
list itself) send email to <owner-san-diego-pm-list at happyfunball.pm.org> .
This is the general rule for most mailing lists when you need
to contact a human.