....
say 'Enter a number: ';
my $number = <STDIN>;
chomp( $number );
say $number;
....

##</code><code>##

Enter a number: 
4
4
bash
done