this script will get marshall's addresses in NJ, and can be easily import to Street and Trips .NET.
$ans=`wget -O- "http://www.marshallsonline.com/search_results_state.aspx?state=nj" | grep "3a56a5"`;
@ans2=split(/<td/,$ans);
foreach $ans2(@ans2){
if ($ans2=~/left/){
($f1,$f2,$f3,$f4,$f5)=split(/<br>/,$ans2);
$f1=~s/^.*<.*>//g;
if ($f4=~/Phone/){
$f3=~s/,/\t/g;
$f3=~s/([\w]) ([\d])/$1\t$2/;
printf("$f2\t$f3\n");
}else{
$f2=~s/,/\t/g;
$f2=~s/([\w]) ([\d])/$1\t$2/;
printf("$f1\t$f2\n");
}
}
}
2004年4月7日
訂閱:
張貼留言 (Atom)
沒有留言:
張貼留言