Would declaring all your variables with one my
suffice?  then your first line before use strict;
should work.  Like this:

my ($a, $b);
$a = $b = 'apple';


--- Jeff Westman <[EMAIL PROTECTED]> wrote:
> This may sound trivial, but I am trying to declare
> and assign multiple
> scalars to the same variable in the same statement. 
> This is what I have:
> 
>  #!/bin/perl -w
>  $a = $b = "apple";        # works
>  use strict;
>  my ($a = $b) = "apple";   # does not works
>  my $a = my $b = "apple";  # works .. but looks ugly
> 
> I'm trying to get away from using multiple "my"s in
> the same statement.  I
> looked at FTP.pm, and for *lists* it's possible:
>  my ($ftp, $dir, $recurse) = @_;
> 
> Is there something I am not seeing? 
> 
> Thanks
> 
> Jeff
> 
> 
> __________________________________
> Do you Yahoo!?
> Yahoo! Calendar - Free online calendar with sync to
> Outlook(TM).
> http://calendar.yahoo.com
> 
> -- 
> To unsubscribe, e-mail:
> [EMAIL PROTECTED]
> For additional commands, e-mail:
> [EMAIL PROTECTED]
> 


__________________________________
Do you Yahoo!?
Yahoo! Calendar - Free online calendar with sync to Outlook(TM).
http://calendar.yahoo.com

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

Reply via email to