Searched refs:databasefile (Results 1 – 1 of 1) sorted by relevance
33 my $databasefile;53 $databasefile = shift @ARGV61 open (my $handle, '<', $databasefile) or die "Cannot open $databasefile";