diff options
Diffstat (limited to 'sbosubmit')
| -rwxr-xr-x | sbosubmit | 9 |
1 files changed, 7 insertions, 2 deletions
@@ -1,5 +1,10 @@ #!/usr/bin/perl -w +# automated submission client for slackbuilds.org web form. +# by B. Watson <yalhcru@gmail.com>. +# Licensed under the WTFPL. See http://www.wtfpl.net/txt/copying/ for details. +# run with no arguments for usage instructions. + use LWP; use Getopt::Std; @@ -100,7 +105,7 @@ print STDERR "Uploading..."; $ua = LWP::UserAgent->new; $ua->agent('Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)'); $resp = $ua->post( - 'http://slackbuilds.org/process_submit/', + 'https://slackbuilds.org/process_submit/', [ MAX_FILE_SIZE => '100000', userfile => [ $userfile ], category => $category, @@ -109,7 +114,7 @@ $resp = $ua->post( comments => $comments, submit => 'Upload File' ], Content_Type => 'form-data', - Referer => 'http://slackbuilds.org/submit/', + Referer => 'https://slackbuilds.org/submit/', ); print STDERR "\n"; |