$netout_new=~/(\d+)\.(\d+)/; $integer=$1; $decimal=$2; print" Integer=$integer and dec=$decimal\n";
See if this helps Urmil -----Original Message----- From: Mat Harris [mailto:[EMAIL PROTECTED]] Sent: Thursday, May 23, 2002 3:53 PM To: [EMAIL PROTECTED] Subject: chop ing i know that chop returns the char chopped but how do i get that into a var? i want to be able to chop all numbers after decimal point from a numeric string. i thought something like this would work: while ($chopped_char ne "."){ chop $netout_new; $chopped_char = "how do i get this???" } cheers Matthew Harrison Internet/Network Services Administrator www.genestate.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]