$ perl -e 'print int (1 + rand 49), " ", for 1..6'
48 16 40 39 21 24

##</code><code>##

$ perl -e 'print 1 + int rand 49, " ", for 1..6'
5 33 19 21 25 39

##</code><code>##

perl -e "print 1 + int rand 49, ' ', for 1..6"

##</code><code>##

$ perl -e 'print int (1 + rand 49), " ", for 1..6'
20 32 37 32 3 39