#!/usr/bin/perl -w $ver = shift || die "Usage: $0 [version]\n"; open F,">dlaver.inc" or die $!; print F " .define VERSION \"$ver\"\n"; close F; open F,">dlaver.h" or die $!; print F "#define VERSION \"$ver\"\n"; close F; exit 0;