Added League ID column and updated README
This commit is contained in:
parent
2b067b7c01
commit
17284c19eb
@ -16,7 +16,7 @@ This may be freely redistributed under the terms of the GNU General Public Licen
|
||||
|
||||
1st argument can be one of these types:
|
||||
google (all members with senate/delegate district query) which prints out this csv data:
|
||||
'Name,Email,Phone,Address,Join Date,Delegate District,Senate District,'
|
||||
'Name,Email,Phone,Address,Delegate District,Senate District,League ID,Join Date'
|
||||
ALL (all members without senate/delegate district query)
|
||||
League ID: WV000 (members at large) WV102 (Huntington) WV103 (Morgantown-Monogalia) WV107 (Wood County) WV112 (Jefferson)
|
||||
|
||||
|
@ -62,7 +62,7 @@ open $fh, "<", $file;
|
||||
my $curl = WWW::Curl::Simple->new();
|
||||
|
||||
my $csv =
|
||||
"Name,Email,Phone,Address,Join Date,Delegate District,Senate District,\n";
|
||||
"Name,Email,Phone,Address,Delegate District,Senate District,League ID,Join Date\n";
|
||||
print $csv;
|
||||
$csv = "";
|
||||
while ( my $line = <$fh> ) {
|
||||
@ -190,6 +190,7 @@ while ( my $line = <$fh> ) {
|
||||
else {
|
||||
$csv .= ",";
|
||||
}
|
||||
$csv .= "$leagueId,";
|
||||
}
|
||||
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user