Help for this page
print "Content-Disposition: inline; filename=$filename\n";
print "Content-Disposition: attachement; filename=$filename\n";