Keith Calvert Ivey wrote: > > perl -MLWP::Simple > > -le"y.,..dfor@a=get('http://cnn.com')=~/([\d,]{9})/g;print$a[0]-$a[1]" ^ ^ What are those doing there? ;-) Not as efficient: perl -MLWP::Simple -le'$_=get('http://cnn.com');y.,..d;@a=/\d{7}/g;print$a[0]-$a[1]' -- Rick Delaney rick.delaney@home.com ==== Want to unsubscribe from Fun With Perl? Well, if you insist... ==== Send email to <fwp-request@technofile.org> with message _body_ ==== unsubscribe