[Solved] Using SFTP to transfer images from HTML form to remote linux server using PERL/CGI.pm

by 


use CGI qw(:standard);
use File::Basename;
my ( $name, $path, $extension) = fileparse ( $productimage, '..*' ); 
$productimage = $name . $extension;
$productimage =~ tr/ /_/; $productimage =~ s/[^$safechars]//g;
if ( $productimage =~/^([$safechars]+)$/ ) {
    $productimage = $1;
} else {
    die "Filename contains invalid characters";
}

$fh = upload('image');
$uploaddir = "../../.hidden/images";
open ( UPLOADFILE, ">$uploaddir/$productimage" )
  or die "$!"; binmode UPLOADFILE;

while (<$fh>) {
    print UPLOADFILE;
}

close UPLOADFILE;

This is the code I used to upload the file into the server.

1

solved Using SFTP to transfer images from HTML form to remote linux server using PERL/CGI.pm