#!/usr/bin/perl # vardb.pl - Read the database I made of Hellfighter fighter vars open(DB,"vardb") or die "HrgGrAarghh"; @fields=(0,1,2,3,4,5); print "Content-type:text/html\n\n"; # Space to keep IE from rendering this as HTML instead of plaintext print "
Craft with variable configurations: | \n"; print "Var | \n"; print "Description | \n"; print "Primary Weapon | \n"; print "Secondary Weapon | \n"; print "Tertiary Weapon |
$a[$_] | "; } print "