> 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;

I think that needs to be:

my ($target,$count,$num) = split /\s+/, $word;

to handle multiple spaces between the values.

Cheers,

 -dave



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to