Using Sirsi API to get ISBN numbers

The goal here is to extract all the books that where cataloged yesterday and get there ISBN numbers. To then sort these and only take the uniq numbers. I then  plan to use these numbers and amazon webservices and get some interesting information then create virtual library cards. I just about have all the pieces in place. One of the things that I an still thinking about catagories and access. At the moment I am thinking that I will transfer the isbn file to another machine and then use mysql, perl and php to do the mashing that I want.
Here is the code I used to do this

#!//bin/perl

open(MYFILE, qq#/s/sirsi/Unicorn/Bin/selitem -tBOOK -f=20051010 -oC | /s/sirsi/Unicorn/Bin/selcatalog -iC -oe -e020|sort|uniq|#);

while (<MYFILE>) {
$mystring=substr($_,0,10);
if ( length($mystring) == 10){
print $mystring . “\n”;
}

}