Submitting a file to a form on unix via cron


I have a windows web server and a unix db server, separated by a firewall.  I am looking to use a web form to copy 2 files hourly from the unix server to the windows server via an automated cron job.

The unix server has netscape and lynx, but lynx does not appear to work.  Perl is available, as is java.  I HAVE NO ROOT PRIVILEGES ON THIS BOX AND CANNOT GET ANY NEW SOFTWARE ADDED TO IT. (I really need wget, but I doubt it is available for AIX on RISC anyway)

What I need is a perl script, or another way to automate a form submission that includes files.  I cannot use FTP because 1) it is blocked at the firewall and 2) I need to process the files on the web server to append them to an Access db.

Does anyone know how to simulate submitting files via a form with a single URL call?

my web page only outputs: <SCRIPT>window.close()</script> to the client.

My form is simple:
<form name=dbupload enctype="multipart/form-data" action="index.php" METHOD="POST">
Dump: <INPUT TYPE=file NAME=dbdump><br>
Tracks: <INPUT TYPE=file NAME=dbtracks><br>
<INPUT TYPE=submit value="Upload Files"><br>


Who is Participating?
IsonumericAlConnect With a Mentor Commented:
You could use Perl. You can install new Perl modules into your non-root account.

(Consider trying a web-testing program, they are able to submit to forms, etc., though they may not have the ability to submit a file: java's HTTPUnit).


See to setup as "non-root install". And chose the CPAN servers that use HTTP.

Or, copy the current config, and edit all the paths that seem relevant.      
      # this tells you all the directories where .pm files are.
      # we want, which was in /usr/lib/perl5/5.8.1/CPAN on my system
      perl -V
      # Copy...
      mkdir .cpan
      mkdir .cpan/CPAN
      # Fix the following path
      cp /usr/lib/perl5/5.8.1/CPAN/ .cpan/CPAN
      edit .cpan/CPAN

And install
      perl -MCPAN -e shell
      install G/GA/GAAS/libwww-perl-5.800.tar.gz


Assuming you have a reasonably modern Perl, you almost certainly have the libwww modules. Try this to check:
      perldoc HTTP::Request
      perl -mHTTP::Request
If either works, you probably have what we need. You can read the "perldoc" to see the documentation (see also the perldoc for HTTP::Request::Commong, LWP::UserAgent).

I'd suggest doing a regular POST, with the file in the body: just like a browser would do. There is a limit to the amount of data you can put in the GET (query-string), officially something like 3k. Check the "method" in the HTML "form" tag.

Here's the steps (edit the url, filename, etc.):

      # be a good programmer
      use strict;
      use warnings;

      # Need the module
      require LWP::UserAgent;

      # Setup the useragent (it does the HTTP protocol)
      my $ua = LWP::UserAgent->new;
      push @{ $ua->requests_redirectable }, 'POST'; # if you need redirect-on-post

      # do the request **EDIT THIS STUFF**
      # (see HTTP::Request::Common,
      my $response = $ua->post(
            # Your url here (from "action":
            # The form fields
                  # A file (from disk) looks like this
                  theFile => [ 'nameOfFileOnDisk', 'nameToTellServer'],
                  # A "input" field (etc.) looks like this
                  address => '123 Anywhere St.',
            ['form-data']      # a header for posting files (mime/multiplart)

      # Check for success
      # Maybe you don't want to "die" here? You could do a "warn"
      # and the output would go to your email (from cron).
      die "Error while POSTING ", $response->request->uri,
            " -- ", $response->status_line, "\nAborting"
            unless $response->is_success
oreomikeAuthor Commented:
I will GLADLY get someone another 500 points for answering this...
Marcus BointonCommented:
Can you use SSH? If so, you should be able to schedule an scp or rsync command to do the copy, both programs are available in most distributions. rsync would have the added advantage that it would only copy if files had been changed.

To persevere on the HTTP route from PHP, you can use CURL to submit form data via POST. First of all, get your file contents into a variable, then submit it as post data:

$data = urlencode(file_get_contents('myuploadfile1.txt'));
$ch = curl_init();   
curl_setopt($ch, CURLOPT_URL, $URL);
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, "data=$data");
curl_exec ($ch);    
curl_close ($ch);

You'll need to tweak this to match the upload script on your windows box.
Keep up with what's happening at Experts Exchange!

Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.

Marcus BointonCommented:
Revised version to match your form example:

$dbdump = urlencode(file_get_contents('dbdump'));
$dbtracks = urlencode(file_get_contents('dbtracks'));
$ch = curl_init();   
curl_setopt($ch, CURLOPT_URL, $URL);
curl_setopt($ch, CURLOPT_POST, 1);
curl_setopt($ch, CURLOPT_POSTFIELDS, "dbdump=$dbdump&dbtracks=$dbtracks");
curl_exec ($ch);    
curl_close ($ch);
oreomikeAuthor Commented:
so I do not have PHP available either on the unix box.  Do you know if perl might have a similar mod as curl?
Marcus BointonConnect With a Mentor Commented:
CURL is a system level library and CLI application that happens to also have a PHP wrapper, so you can use it from pretty much anywhere, including perl and shell scripts. Try 'man curl' to see what it can do from a CLI (and thus a shell script). You'll find that the constants used in the PHP script are the same in all CURL implementations, so the above script may be of use anyway. Apart from that, I'm going to take a wild guess and suggest that the PHP TA is not the best place to ask about this!
oreomikeAuthor Commented:
probably, but I didn't see a perl forum.  Thanks anyway.  I'll probably try a java cli instead.
oreomikeAuthor Commented:
The unix box does not have the LWP:UserAgent package installed.
Marcus BointonCommented:
You'd be much better off going with a shell script than Java. Java is monstrously inefficient for small operations like this.
More on installing perl modules as non-root:
oreomikeAuthor Commented:
All of your suggestions were good, but given my limited ability to do anything on the box, including a limited FS size for the home directories, I was forced to go java.

I have included the code that I modified from to only upload a single file to a form with a single element.  Currently it only will work well with text files and may need a change to \n's to make them \r\n's.  Haven't had time to fully check it out.  Also, I am sure there is a better way to send contents of a file to an InputStream, but this gets my file there and I am happy.

Thanks for all of your quick and thorough help.



public class uploadFile {

  public static void writeFile(DataOutputStream dstream,String filename,String formname) throws Exception {
      File f0 = new File(filename);
      try {
            FileInputStream fi = new FileInputStream(f0);
            dstream.writeBytes("Content-Disposition: form-data; name=\""+formname+"\"; filename=\""+f0.getName()+"\"\r\n");
            dstream.writeBytes("Content-Type: text/plain\r\n\r\n");
            int cnt =;
                  cnt =;
      } catch (FileNotFoundException e) {
            System.out.println("File not found: " + f0.getName());

  public static void main(String[] args) throws Exception {
      if (args.length != 5) {
            "Usage:\njava uploadFile http://this/url.php formInputBoxName /path/and/");
      String strURL = args[0]
      URL url = new URL(strURL);
      URLConnection conn = url.openConnection();
      conn.setRequestProperty("Content-Type","multipart/form-data; boundary=****4353");
      DataOutputStream dstream = new DataOutputStream(conn.getOutputStream());


            DataInputStream in = new DataInputStream( new BufferedInputStream(conn.getInputStream()));
            String sIn = in.readLine();
            boolean b = true;
                  sIn = in.readLine();

      } catch (Exception e) {
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.