http://qs321.pair.com?node_id=971984


in reply to Need help with a simple perl script

For someone who's "fairly new" to perl, this is some heavy-duty code :)
The thing is...When I run the code on a linux-system with perl 5.10.1, I'm getting the results exactly like your desired outcome.
What environment (OS, perl version) are you running your script on?