Try

 my $cmd1 = (split/\s+/,$cmd)[0]; 

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] 
Sent: 20 September 2007 13:04
To: [EMAIL PROTECTED]; Andrew Curry
Cc: beginners@perl.org
Subject: Re: RE: White space split


--- [EMAIL PROTECTED] wrote:

> Thanks Andrew and Jeff.
> ($cmd1, $rest)=split/\s+/,cmd$; worked for me. 
> my ($cmd1) = split/\s+/,$cmd;  is still giving me the length...
> I wanted to use something like above ...

you may type something wrong?see the test,

$ cat t3.pl 
my $cmd = "maheshverama           #XXXXXXXXXXXXXXXXXXXXXX#";
my ($cmd1) = split /\s+/,$cmd;
print $cmd1;

$ perl t3.pl
maheshverama


 
____________________________________________________________________________
________
Sick of deleting your inbox? Yahoo!7 Mail has free unlimited storage.
http://au.docs.yahoo.com/mail/unlimitedstorage.html


This e-mail is from the PA Group.  For more information, see
www.thepagroup.com.

This e-mail may contain confidential information.  Only the addressee is
permitted to read, copy, distribute or otherwise use this email or any
attachments.  If you have received it in error, please contact the sender
immediately.  Any opinion expressed in this e-mail is personal to the sender
and may not reflect the opinion of the PA Group.

Any e-mail reply to this address may be subject to interception or
monitoring for operational reasons or for lawful business practices.





-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to