diff PokeScrape.pl @ 2:d7dd496a4fa6 boosterpack

[svn r4] actual functionality!
author robert
date Tue, 08 Sep 2009 02:45:26 -0400
parents 477258d09353
children 2e849c856026
line wrap: on
line diff
     1.1 --- a/PokeScrape.pl	Mon Aug 31 14:53:15 2009 -0400
     1.2 +++ b/PokeScrape.pl	Tue Sep 08 02:45:26 2009 -0400
     1.3 @@ -43,10 +43,11 @@
     1.4  	
     1.5  	if ($line =~ m/^<td/)
     1.6  	{
     1.7 -		print $numTag," ",$nameTag, "\n";
     1.8 +		print $numTag," ",$nameTag;
     1.9  		$tempCard = Card->new();
    1.10  		$tempCard->addTags($typeTag,$numTag,$nameTag,$setTag,$rarityTag);
    1.11  		$tempCard->setPix($pix);
    1.12 +		print " $setTag \n";
    1.13  		push @allcards,$tempCard;
    1.14  		
    1.15