> but if I use:
> 
> [EMAIL PROTECTED] gary]$ cat t
> #!/usr/bin/perl -w
> 
> use strict;
> 
> my ($fred,$ginger)='';
> 
> print "fred=$fred\n";
> print "ginger=$ginger\n";
> [EMAIL PROTECTED] gary]$ ./t
> fred=
> Use of uninitialized value in concatenation (.) or string at 
> ./t line 8.
> ginger=
> [EMAIL PROTECTED] gary]$

my ($fred, $ginger) = ('') x 2;

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

Reply via email to