Cheers,use warnings; use strict; no warnings 'numeric'; my $str = q(<body onunload="params='s=o&n=o&ci=5413226&iv=0&pi=34&sess +id=c1e7be2e5d3518213a67577cf5b2b1c4bd0a0619&uuid=c1e7be2e5d3518213a67 +577cf5b2b1c4bd0a0619&prt=1238476904&pgtp=article&eagi=&t_v=v&">); my $num = (split /ci=/, $str)[1] + 0; print $num;
In reply to Re: grep for numbers
by syphilis
in thread grep for numbers
by sandy1028
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |