[catagits/Catalyst-Controller-WrapCGI.git] / t / lib / TestCGIBin / root / cgi-bin / pathinfo.pl

#!/usr/bin/perl 

use strict;
use warnings;

use CGI ':standard';

print header;
print $ENV{PATH_INFO};
Commit	Line	Data
f410f043	1	#!/usr/bin/perl
	2
	3	use strict;
	4	use warnings;
	5
	6	use CGI ':standard';
	7
	8	print header;
	9	print $ENV{PATH_INFO};