File: asp-perl2.t

package info (click to toggle)
libapache-asp-perl 2.62-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd, wheezy
  • size: 4,108 kB
  • ctags: 830
  • sloc: perl: 6,033; php: 417; sh: 65; lisp: 22; makefile: 10
file content (11 lines) | stat: -rw-r--r-- 282 bytes parent folder | download | duplicates (7)
1
2
3
4
5
6
7
8
9
10
11

use File::Basename qw(dirname);
my $dirname = dirname($0);
if($dirname) {
    chdir($dirname) || die("can't chdir to $dirname: $!");
}		     
chdir('asp-perl') || die("can't chdir to asp-perl");

@ARGV = ('-b', 'ok.inc');
use lib qw(../../blib/lib ../../lib);
do "../../asp-perl";