> $string = "\<programme start=\"20021221235500 UTC\" > stop=\"20021222001000 > UTC\" channel=\"carlton.com\>"; > ($programme, $stop, $channel) = ($string =~ > m/\S+\s\S+\"(\d+)\s\S+\s\S+\"(\d+)\s\S+\s\S+\"(\S+)\"\>/); > > If the <> were not actually part of the string, this will > work the same > ($programme, $stop, $channel) = ($string =~ > m/\S+\s\S+\"(\d+)\s\S+\s\S+\"(\d+)\s\S+\s\S+\"(\S+)\"/); > > Maybe not the most elegant way of doing it, but it works.
here is something a little shorter that worked for me: ($programme, $stop, $channel) = ($string =~ m/.*=(\d+).*=(\d+).*=(\S+)/); -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
