Re: Getting with HTTP 405 using HTML::Form

[Tim Allwine]

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";
                }
            }
        }
    }
}