starting to move ethnicity stuff out of programs and into modules

This commit is contained in:
pate 2002-04-17 21:35:53 +00:00
parent 1b1c78dde4
commit 214257b1d8

View file

@ -9,10 +9,12 @@ $VERSION = 0.01;
@ISA = qw(Exporter); @ISA = qw(Exporter);
@EXPORT = qw(&slashifyDate @EXPORT = qw(&slashifyDate
&fixEthnicity); &fixEthnicity
$DEBUG);
use vars qw(); use vars qw();
my $DEBUG = 0;
sub slashifyDate { sub slashifyDate {
# accepts a date of the form xx-xx-xx[xx] and returns it in the # accepts a date of the form xx-xx-xx[xx] and returns it in the