Perl

Upload Files to a Web Server - Simplest Example

See more Upload Examples

This is the simplest example for uploading some files to a web server. the BlockingUpload call is synchronous and returns when the upload is finished (or failed).

A server-side C# example showing how to receive an upload is located at C# ASP.NET Code to Receive Upload

Chilkat2 Perl

use strict;
use warnings;
use Chilkat2;

my $upload = Chilkat2::Upload->new;

# Specify the page (ASP, ASP.NET, Perl, Python, Ruby, CGI, etc)
# that will receive and process the HTTP Upload.
$upload->Hostname('www.mywebserver.com');
$upload->Path('/receiveUpload.aspx');

# Add one or more files to be uploaded.
$upload->AddFileReference('file1', 'dude.gif');
$upload->AddFileReference('file2', 'swordfish.xml');
$upload->AddFileReference('file3', 'sample.doc');

# Do the upload.  The method returns when the upload
# is completed.
# This component also includes asynchronous upload capability,
# which is demonstrated in another example.
my $success = $upload->BlockingUpload();
if (!$success) {
    print $upload->LastErrorText, "\n";
} else {
    print "Files uploaded!\n";
}