xref: /openbsd-src/gnu/usr.bin/perl/cpan/Test-Harness/t/source_tests/psql.bat (revision 898184e3e61f9129feb5978fad5a8c6865f00b92)
1*898184e3Ssthen@rem = '--*-Perl-*--
2*898184e3Ssthen@echo off
3*898184e3Ssthenif "%OS%" == "Windows_NT" goto WinNT
4*898184e3Ssthenperl -x -S "%0" %1 %2 %3 %4 %5 %6 %7 %8 %9
5*898184e3Ssthengoto endofperl
6*898184e3Ssthen:WinNT
7*898184e3Ssthenperl -x -S %0 %*
8*898184e3Ssthenif NOT "%COMSPEC%" == "%SystemRoot%\system32\cmd.exe" goto endofperl
9*898184e3Ssthenif %errorlevel% == 9009 echo You do not have Perl in your PATH.
10*898184e3Ssthenif errorlevel 1 goto script_failed_so_exit_with_non_zero_val 2>nul
11*898184e3Ssthengoto endofperl
12*898184e3Ssthen@rem ';
13*898184e3Ssthen#!/usr/bin/perl
14*898184e3Ssthen#line 15
15*898184e3Ssthen
16*898184e3Ssthenprint $_, $/ for @ARGV;
17*898184e3Ssthen
18*898184e3Ssthen__END__
19*898184e3Ssthen:endofperl
20