File: test.pl

package info (click to toggle)
librose-db-object-perl 0.770-1
  • links: PTS, VCS
  • area: main
  • in suites: lenny
  • size: 4,068 kB
  • ctags: 2,125
  • sloc: perl: 73,047; sql: 28; makefile: 10
file content (12 lines) | stat: -rwxr-xr-x 350 bytes parent folder | download | duplicates (9) 
1
2
3
4
5
6
7
8
9
10
11
12
 
#!/usr/bin/perl

use FindBin qw($Bin);

chdir($Bin) or die "Could not chdir($Bin) - $!";

use lib "$Bin/../../../lib";
use lib "$Bin/../../../../Rose-DB/lib";
use lib "$Bin/lib";

system(qw(/usr/bin/perl -I ../../../lib -I ../../../../Rose-DB/lib -I lib t/one.t));
system(qw(/usr/bin/perl -I ../../../lib -I ../../../../Rose-DB/lib -I lib t/two.t));