- or download this
# nonsense to know the file size
...
print $len."\n";
exit 1;
}
- or download this
$len = -s $file; # not length($file)
- or download this
if(($ARGV[2]=~m/-t/)==1){
$MAX_SIZE_PART=substr($ARGV[2],2);
}
- or download this
if ( $ARGV[2] =~ /^-t(\d+)/ ) {
$MAX_SIZE_PART = $1;
} else {
die "Usage: blah blah\n";
}