[Please don't top-post]
Michael Stearman wrote: > > Right now it is not working and I was wondering if I sent the code maybe > someone with more experience with this will see the problem. I am very new > to this. The line I am trying to create the variables from is > > C6xxxSimulator(TI) 61 1 > > and the code is > > $word = <DATA>; #Assign the next line to the $word variable > chomp $word; > print "$word\n"; > my ($target, $count, $num) = $word = ~ /^\s*(\S+)\s+(\S+)\s+(\S+)\s*$/; my ($target, $count, $num) = split ' ', $word; > print "Target = $target \n"; > print "Count = $count \n"; John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
