@result = map { print "Enter scaling factor:"; $_ * int() } @array;