Super Starz of Fantasy Wrestling
;
} until ($line =~ /\w/);
while ($line =~ /\w/) {
chop ($line);
$hitters[$hittercount ] = $line;
$line = ;
}
$line = ;
while ($line =~ /\w/) {
chop ($line);
$pitching[$pitchercount ] = $line;
$line = ;
}
} else {
@hitters = $ARGV[0]; @pitching = $ARGV[0];
}
}
sub get_addresses
{
local ($index, @split_index, @split_lines);
$/ = "