- or download this
my @well = split ('', $well);
$highest = $well[0]; # definately problems here, cant pick out $
+well[0]
- or download this
for ($i = 0; $i < @well; $i++) {
# scalar(@well) here
...
}
}
- or download this
foreach $number (@well) {
$highest=$number if $highest<$number;
}