#!/usr/bin/perl
#
# Transform a template containing @component@ and @VERSION@
#

# Arguments: component, version
my ($component, $VERSION) = @ARGV or die("usage: vtempl.pl <component> <VERSION>\n");

while (<STDIN>) {
	s/\@component\@/$component/g;
	s/\@VERSION\@/$VERSION/g;
	print $_;
}