develooper Front page | perl.libwww | Postings from September 2001

Re: Getting with HTTP 405 using HTML::Form

Thread Previous | Thread Next
From:
Tim Allwine
Date:
September 8, 2001 10:54
Subject:
Re: Getting with HTTP 405 using HTML::Form
Message ID:
3B9A5B3E.2DD8B6E2@oreilly.com
steve borruso wrote:
> 
> I tried the following with the same 405 result ....
> 
> my $r5 = $ua->simple_request(POST "http://cgi5.ebay.com/eBayISAPI.dll",
>                 {
>                 MfcISAPICommand =>'PreviewAddToItem',
>                 userid          => $userid ,
>                 pass            => $encrypt_pass ,
>                 itemno          => $logo_items[$i] ,
>                 desc            => $AlterDesc,
>                 addcounter      => '' ,
>                 counterstyle    => '-1' ,
>                 return => 'http://cgi5.ebay.com',
>                 });
> 
> Would this point a non HTML:Form problem ?
> I don't know how to run a packet sniffer. Anybody have
> any other ideas ?
> 

I've posted this before, here it is again:
Run it as root.

#!/usr/bin/perl
$|=1;
open (STDIN,"/usr/sbin/tcpdump -lnx -s 4096 |");
while (<>) {
    if(/^\s+/) {
        s/\s+//g;
        my @bytes = ();
        @bytes = $_ =~ /([0-9a-f]{2})/g;
        for my $byte (@bytes) {
            if ((hex($byte) > 31) and (hex($byte) < 127)) {
                print chr(hex($byte));
            } else {
                if (hex($byte) eq hex('0a') ) {
                    print "\n";
                } elsif (hex($byte) eq hex('0d') ) {
                    next;
                } elsif (hex($byte) eq hex('09') ) {
                    print "\t";
                }
            }
        }
    }
}

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About