Don't ask to ask, just ask | |
PerlMonks |
Re: Matching probemby marinersk (Priest) |
on May 29, 2017 at 11:35 UTC ( [id://1191499]=note: print w/replies, xml ) | Need Help?? |
Okay, so your first problem seems to be that you're not getting your input correctly. I've added strictand warnings and the commensurate mystatements, and then used Data::Dumperto show what you're collecting:
The output shows you're collecting a bunch of 1s:
Nothing else matters until you fix that. This is a variant of what we used to, in the profession, call "garbage in, garbage out". Now, I could tell you why you're collecting 1s instead of car manufacturers, but it's a good exercise for you to take a stab at explaining why. What's your best guess(es)?
In Section
Seekers of Perl Wisdom
|
|