# ex_02-4

# Learning Perl on Win32 Systems, Exercise 2.4



print "String: "; $a = <STDIN>;

print "Number of times: "; chomp($b = <STDIN>);

$c = $a x $b; print "The result is:\n$c";