print "pid:$$\n"; my $x = 'monks' x (3); sleep 60; #### print "$$\n"; my $n = 3; $x = 'monks' x ($n); sleep 60; #### monksmonksmonks monks #### print "$$\n"; $x = 'monks' x (3); sleep 60; #### monksmonksmonks monksmonksmonks monksmon<
## print "$$\n"; my $n = 3; $x = 'monks' x ($n); sleep 60; ##
## monksmonksmonks monks ##
## print "$$\n"; $x = 'monks' x (3); sleep 60; ##
## monksmonksmonks monksmonksmonks monksmon<