Change this line

Code:
 while $read(list.txt,%x) {


to

Code:
 while ( $read(list.txt,%x) ) && ( %x <= 3 )  {


** Change 3 to your desired number

If you have a plastic floor runner over your tiles, then you're one Hella Pinoy!