The main file used by samie is found here by default c:\Perl\site\lib\Win32\SAM.pm. Take a look in this file to see how samie was written. And to see what each subroutine takes as a parameter, some of them are optional.

EXAMPLE FOUND HERE

Here is some boiler plate stuff to help you get started...

use strict;
use Win32::OLE;
use Win32::SAM;
#use Win32::Slingshot;

$| = 1;
my $URL = "http://www.amazon.com/exec/obidos/subst/home/home.html/103-9172868-6219849";
my $seconds;

$Win32::OLE::Warn = 3;

StartIE();
$seconds = Navigate($URL);
print "First Page took $seconds seconds to load\n";
SetListBoxItem("url","index=baby");
SetEditBox("field-keywords","Diaper");
$seconds = ClickFormImage("Go");
print "Second Page took $seconds seconds to load\n";

-------------------------------------------------------------------------------

A little explanation:

sub SetListBoxItem { #$SelectName, $ItemName
Notice SetListBoxItem uses "url" and "Baby", look at Amazon's view source html

&ltselect name=url>
&ltoption value="index=aps" selected&gtAll Products
&ltoption value="index=books"&gtBooks
&ltoption value="index=music"&gtPopular Music
&ltoption value="index=music-dd"&gtMusic Downloads
&ltoption value="index=classical"&gtClassical Music
&ltoption value="index=dvd"&gtDVD
&ltoption value="index=vhs"&gtVHS
&ltoption value="index=restaurants"&gtRestaurants (Beta)
&ltoption value="index=theatrical"&gtMovie Showtimes
&ltoption value="index=toys"&gtToys
&ltoption value="index=baby"&gtBaby