Select Code to Download

my $file_upload="$dir_details->{WORK_DIR}/upload/$params->{upname}.dat
+";

$file_next = (perl -ple "exit if $. > 10" $file_upload);