# foreach (1 .. 1024) # { # syswrite(DEV, 'L' x 1024, 1024); # } # $MCounter++; # printf("\r %f MiB", $MCounter); # if ($MCounter >= 100) # { # close(DEV); # exit(0); # } # sysseek(DEV,(1024*1024*2), 1); # print("\nJumping 2mb\n");