[OpenSPARC-T2-DV] / tools / perl-5.8.0 / lib / site_perl / 5.8.0 / auto / Inline / M49_usage_unsafe.al

# NOTE: Derived from blib/lib/Inline.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Inline;

#line 1803 "blib/lib/Inline.pm (autosplit into blib/lib/auto/Inline/M49_usage_unsafe.al)"
sub M49_usage_unsafe {
    my ($terminate) = @_;
    return <<END .
You are using the Inline.pm module with the UNTAINT and SAFEMODE options,
but without specifying the DIRECTORY option. This is potentially unsafe.
Either use the DIRECTORY option or turn off SAFEMODE.

END
      ($terminate ? <<END : "");
Since you are running as the a privledged user, Inline.pm is terminating.

END
}

# end of Inline::M49_usage_unsafe
1;
Commit	Line	Data
86530b38 AT	1	# NOTE: Derived from blib/lib/Inline.pm.
	2	# Changes made here will be lost when autosplit is run again.
	3	# See AutoSplit.pm.
	4	package Inline;
	5
	6	#line 1803 "blib/lib/Inline.pm (autosplit into blib/lib/auto/Inline/M49_usage_unsafe.al)"
	7	sub M49_usage_unsafe {
	8	my ($terminate) = @_;
	9	return <<END .
	10	You are using the Inline.pm module with the UNTAINT and SAFEMODE options,
	11	but without specifying the DIRECTORY option. This is potentially unsafe.
	12	Either use the DIRECTORY option or turn off SAFEMODE.
	13
	14	END
	15	($terminate ? <<END : "");
	16	Since you are running as the a privledged user, Inline.pm is terminating.
	17
	18	END
	19	}
	20
	21	# end of Inline::M49_usage_unsafe
	22	1;