xr-pl-new

   1 #!/usr/bin/perl -w
   2 ###APPNAME:     xr-pl-new
   3 ###APPAUTHOR:   xiaoranzzz
   4 ###APPDATE:     Wed Apr  2 21:05:11 2008
   5 ###APPVER:      0.1
   6 ###APPDESC:     xr-pl-new
   7 ###APPUSAGE:
   8 ###APPEXAMPLE:  xr-pl-new
   9 ###APPOPTION:
  10 use strict;
  11 use lib $ENV{XR_PERL_MODULE_DIR};
  12
  13 use MyPlace::Script::Usage qw/help_even_empty/;
  14 exit 0 if(help_even_empty($0,@ARGV));
  15