Mercurial > boosterpack

comparison PokeScrape.pl @ 2:d7dd496a4fa6 boosterpack

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r4] actual functionality!
author robert
date Tue, 08 Sep 2009 02:45:26 -0400
parents 477258d09353
children 2e849c856026
comparison
equal deleted inserted replaced
1:c702488ef795 2:d7dd496a4fa6
41 $rarityTag = $1; 41 $rarityTag = $1;
42 42
43 43
44 if ($line =~ m/^<td/) 44 if ($line =~ m/^<td/)
45 { 45 {
46 print $numTag," ",$nameTag, "\n"; 46 print $numTag," ",$nameTag;
47 $tempCard = Card->new(); 47 $tempCard = Card->new();
48 $tempCard->addTags($typeTag,$numTag,$nameTag,$setTag,$rarityTag); 48 $tempCard->addTags($typeTag,$numTag,$nameTag,$setTag,$rarityTag);
49 $tempCard->setPix($pix); 49 $tempCard->setPix($pix);
50 print " $setTag \n";
50 push @allcards,$tempCard; 51 push @allcards,$tempCard;
51 52
52 53
53 } 54 }
54 55