my $vendor - shift @ARGV;
my $price_file = shift @ARGV;