[Perl] a one-line command to create a random number

Here is how to create a random number between 0 and 100 with this simple perl one-line command :

[pene@donunix] perl -e "print int(rand(100))"