Select Code to Download

open my $file, '<', $filename or die $!;
seek $file, $offset, 0 or die "Report error - $!";

seek "$file" blah blah