my @b = map {sprintf("%.2f",$_)} @a;