my @array = ("  321abc  ", "100%", "20 lbs.");
no warnings "numeric";
print(0+$_,"\n") for @array;