On 11-04-27 06:47 AM, jet speed wrote:
0079 Not Visible 6000097000029260057253303030373
Try this: #!/usr/bin/env perl use strict; use warnings; my $text = '0079 Not Visible 6000097000029260057253303030373'; my @numbers = $text =~ /(\d+)/g; print "@numbers\n"; __END__ -- Just my 0.00000002 million dollars worth, Shawn Confusion is the first step of understanding. Programming is as much about organization and communication as it is about coding. The secret to great software: Fail early & often. Eliminate software piracy: use only FLOSS. -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
