#! perl -lw
die unless ($file,$version)= $ARGV[0] =~ /^(\S+)-([0-9.]+)$/;
print "$file/$version/$file-$version"
