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

#!/usr/bin/perl 

use strict;
use warnings;

use CGI ':standard';

BEGIN { $SIG{INT} = 'IGNORE'; }

$SIG{INT} = 'IGNORE';

print header;
Commit	Line	Data
d5ba2ab2	1	#!/usr/bin/perl
	2
	3	use strict;
	4	use warnings;
	5
	6	use CGI ':standard';
	7
fa86df5d	8	BEGIN { $SIG{INT} = 'IGNORE'; }
aa4613a9	9
fa86df5d	10	$SIG{INT} = 'IGNORE';
d5ba2ab2	11
d5ba2ab2	12	print header;