#!/usr/bin/perl # Generate 100 random numbers between 250 and 500 for ($x=250;$x<500;$x++) { if (($x<500) && ($x>250)) { print rand(100)."\t"; if ($x%5==0) { print "\n"; } } } END;