t/.#compile.t.1.1.1.1

   1 # $Id: compile.t,v 1.1.1.1 2004/01/12 14:14:33 comdog Exp $
   2
   3 use Test::More tests => 1;
   4
   5 my $file = "blib/script/scriptdist";
   6
   7 print "bail out! Script file is missing!" unless -e $file;
   8
   9 my $output = `perl -c $file 2>&1`;
  10
  11 print "bail out! Script file is missing!" unless
  12         like( $output, qr/syntax OK$/, 'script compiles' );