On 9/14/06, Derek B. Smith <[EMAIL PROTECTED]> wrote:
my %subdir_for = (
'bpjava\-msvc' => 23,
'bpjava\-susvc' => 24,
'bpjava\-usvc' => 25,
)
Those backslashes aren't doing anything. But they aren't needed,
either; hyphen isn't a special character in a hash key or
single-quoted string.
##-- Treat each sequence of whitespace,non-wsp as a
word --##
my @words = split /\s+|\S+/, $words;
You probably don't want the second alternative in that pattern, since
it's stealing your words. (Doesn't that split always return an empty
list?)
return $num;
sub zipit {
Huh? Is zipit a sub inside a sub?
I'm sure there are more bugs, but I hope this will get you a little
closer to a valid solution. Cheers!
--Tom Phoenix
Stonehenge Perl Training
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
