WC -Sx- Jones wrote:
> Hmmm, I get 3 Indians in only the first variable anyways =/
Doesn't surprise me. The x is a concatentation multiplierfor strings. Why not
just say what you want:
$_ = 'Litttle' for my ( $onelittle,
$twolittle,
$threelittle,
) ;
print "1 $onelittle 2 $twolittle 3 $threelittle Euro-American Doughblobs\n\n";
One thing notable about all of this is that no work is saved, or very little.
Hmmm...
my $number_names = [qw /Zero One Two Three Four Five Six Seven Eight Nine
Ten Eleven Twelve Thirteen Fourteen Fifteen Sixteen Seventeen Eighteen
Noneteen / ]; # Yeah, we only need 1..3, but I only want to write that once
per language.
print "$number_names->[$_] little " for (1..3);
print "Euro-American Doughblobs\n\n";
Joseph
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
