#!/usr/bin/perl -w use strict; use warnings; # shorten file to 50GB: truncate "K:\\LINUX\\SparkyLinux.bin", 50000000000;