|
Packit |
f3e6b9 |
#!/usr/bin/perl
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
use warnings;
|
|
Packit |
f3e6b9 |
use strict;
|
|
Packit |
f3e6b9 |
require 5.002;
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
if ( -f "t/do_tests.pl" ) {
|
|
Packit |
f3e6b9 |
require "./t/do_tests.pl";
|
|
Packit |
f3e6b9 |
} elsif (-f "do_tests.pl") {
|
|
Packit |
f3e6b9 |
require "./do_tests.pl";
|
|
Packit |
f3e6b9 |
} else {
|
|
Packit |
f3e6b9 |
die "ERROR: cannot find do_tests.pl\n";
|
|
Packit |
f3e6b9 |
}
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
do_tests('currency','','oo');
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
1;
|
|
Packit |
f3e6b9 |
# Local Variables:
|
|
Packit |
f3e6b9 |
# mode: cperl
|
|
Packit |
f3e6b9 |
# indent-tabs-mode: nil
|
|
Packit |
f3e6b9 |
# cperl-indent-level: 3
|
|
Packit |
f3e6b9 |
# cperl-continued-statement-offset: 2
|
|
Packit |
f3e6b9 |
# cperl-continued-brace-offset: 0
|
|
Packit |
f3e6b9 |
# cperl-brace-offset: 0
|
|
Packit |
f3e6b9 |
# cperl-brace-imaginary-offset: 0
|
|
Packit |
f3e6b9 |
# cperl-label-offset: 0
|
|
Packit |
f3e6b9 |
# End:
|