1.1 --- a/cards.pl	Thu Sep 10 08:01:18 2009 -0400
     1.2 +++ b/cards.pl	Fri Mar 19 07:28:10 2010 -0400
     1.3 @@ -1,49 +1,49 @@
     1.4 -#!C:/strawberry/perl/bin/perl.exe
     1.5 -
     1.6 -
     1.7 -use CGI::Ajax;
     1.8 -use CGI;
     1.9 -
    1.10 -my $q = new CGI;
    1.11 -
    1.12 -
    1.13 -my %hash = ( 'card_list' => \&CardList, 'display_card' => \&DisplayCard , 'tags' => \&getAllTags);
    1.14 -
    1.15 -
    1.16 -
    1.17 -
    1.18 -my $pjx = CGI::Ajax->new(%hash);
    1.19 -$pjx->JSDEBUG(1);
    1.20 -$pjx->DEBUG(1);
    1.21 -print $pjx->build_html($q,\&gen); # this outputs the html for the page
    1.22 -
    1.23 -
    1.24 -
    1.25 -
    1.26 -
    1.27 -sub getAllTags
    1.28 -{
    1.29 -	return 14;
    1.30 -};
    1.31 -
    1.32 -
    1.33 -
    1.34 -sub DisplayCard
    1.35 -{
    1.36 -	return 13;	
    1.37 -};
    1.38 -
    1.39 -
    1.40 -sub CardList
    1.41 -{
    1.42 -	
    1.43 -	return 15;
    1.44 -	
    1.45 -};
    1.46 -
    1.47 -
    1.48 -sub gen
    1.49 -{
    1.50 -open FILE, "<cards.html";
    1.51 -return do { local $/; <FILE> };
    1.52 -};
    1.53 \ No newline at end of file
    1.54 +#!/usr/bin/perl
    1.55 +
    1.56 +
    1.57 +use CGI::Ajax;
    1.58 +use CGI;
    1.59 +
    1.60 +my $q = new CGI;
    1.61 +
    1.62 +
    1.63 +my %hash = ( 'card_list' => \&CardList, 'display_card' => \&DisplayCard , 'tags' => \&getAllTags);
    1.64 +
    1.65 +
    1.66 +
    1.67 +
    1.68 +my $pjx = CGI::Ajax->new(%hash);
    1.69 +$pjx->JSDEBUG(1);
    1.70 +$pjx->DEBUG(1);
    1.71 +print $pjx->build_html($q,\&gen); # this outputs the html for the page
    1.72 +
    1.73 +
    1.74 +
    1.75 +
    1.76 +
    1.77 +sub getAllTags
    1.78 +{
    1.79 +	return 14;
    1.80 +};
    1.81 +
    1.82 +
    1.83 +
    1.84 +sub DisplayCard
    1.85 +{
    1.86 +	return 13;	
    1.87 +};
    1.88 +
    1.89 +
    1.90 +sub CardList
    1.91 +{
    1.92 +	
    1.93 +	return 15;
    1.94 +	
    1.95 +};
    1.96 +
    1.97 +
    1.98 +sub gen
    1.99 +{
   1.100 +open FILE, "<cards.html";
   1.101 +return do { local $/; <FILE> };
   1.102 +};