Perl Random Function Matlab