Lines Matching defs:TRUE
540 PL_dirty = TRUE;
1378 PL_taint_warn = TRUE;
1379 PL_tainting = TRUE;
1385 PL_tainting = TRUE;
1421 incpush(p, TRUE, TRUE, FALSE);
1432 PL_preprocess = TRUE;
1437 dosearch = TRUE;
1527 PL_doextract = TRUE;
1567 PL_tainting = TRUE;
1599 PL_taint_warn = TRUE;
1600 PL_tainting = TRUE;
1725 (sv = GvSV(gv_fetchpv("\017PEN", TRUE, SVt_PV)))) {
2081 return call_sv((SV*)get_cv(sub_name, TRUE), flags);
2164 CATCH_SET(TRUE);
2338 (OP*)&myop, TRUE);
2346 call_body((OP*)&myop,TRUE);
2454 if ((gv = gv_fetchpv(sym,TRUE, SVt_PV)))
2584 sv_setsv(get_sv("/", TRUE), PL_rs);
2592 PL_minus_F = TRUE;
2599 PL_minus_a = TRUE;
2603 PL_minus_c = TRUE;
2686 incpush(e, TRUE, TRUE, FALSE);
2696 PL_minus_l = TRUE;
2759 PL_minus_n = TRUE;
2763 PL_minus_p = TRUE;
2768 PL_doswitches = TRUE;
2785 PL_do_undump = TRUE;
2789 PL_unsafe = TRUE;
3021 gv = gv_fetchpv("main::",TRUE, SVt_PVHV);
3026 PL_incgv = gv_HVadd(gv_AVadd(gv_fetchpv("INC",TRUE, SVt_PVAV)));
3028 PL_hintgv = gv_fetchpv("\010",TRUE, SVt_PV); /* ^H */
3030 PL_defgv = gv_fetchpv("_",TRUE, SVt_PVAV);
3031 PL_errgv = gv_HVadd(gv_fetchpv("@", TRUE, SVt_PV));
3033 PL_replgv = gv_fetchpv("\022", TRUE, SVt_PV); /* ^R */
3044 sv_setpvn(get_sv("/", TRUE), "\n", 1);
3660 if (!cando(S_IXUSR,TRUE,&PL_statbuf))
4017 sv_setpvn(get_sv("\"", TRUE), " ", 1);
4018 PL_stdingv = gv_fetchpv("STDIN",TRUE, SVt_PVIO);
4023 tmpgv = gv_fetchpv("stdin",TRUE, SVt_PV);
4027 tmpgv = gv_fetchpv("STDOUT",TRUE, SVt_PVIO);
4033 tmpgv = gv_fetchpv("stdout",TRUE, SVt_PV);
4037 PL_stderrgv = gv_fetchpv("STDERR",TRUE, SVt_PVIO);
4042 tmpgv = gv_fetchpv("stderr",TRUE, SVt_PV);
4068 sv_setpv(GvSV(gv_fetchpv(argv[0]+1,TRUE, SVt_PV)),s);
4071 sv_setiv(GvSV(gv_fetchpv(argv[0]+1,TRUE, SVt_PV)),1);
4074 if ((PL_argvgv = gv_fetchpv("ARGV",TRUE, SVt_PVAV))) {
4145 if ((tmpgv = gv_fetchpv("0",TRUE, SVt_PV))) {
4154 if ((tmpgv = gv_fetchpv("\030",TRUE, SVt_PV))) {/* $^X */
4165 if ((PL_envgv = gv_fetchpv("ENV",TRUE, SVt_PVHV))) {
4205 if ((tmpgv = gv_fetchpv("$",TRUE, SVt_PV))) {
4216 (void) get_av("main::F", TRUE | GV_ADDMULTI);
4219 (void) get_av("main::-", TRUE | GV_ADDMULTI);
4220 (void) get_av("main::+", TRUE | GV_ADDMULTI);
4231 incpush(s, TRUE, TRUE, TRUE);
4233 incpush(PerlEnv_getenv("PERLLIB"), FALSE, FALSE, TRUE);
4242 do { incpush(buf,TRUE,TRUE,TRUE); } while (my_trnlnm("PERL5LIB",buf,++idx));
4244 while (my_trnlnm("PERLLIB",buf,idx++)) incpush(buf,FALSE,FALSE,TRUE);
4252 incpush(APPLLIB_EXP, TRUE, TRUE, TRUE);
4256 incpush(ARCHLIB_EXP, FALSE, FALSE, TRUE);
4269 incpush(SvPVX(privdir), TRUE, FALSE, TRUE);
4272 incpush(SvPVX(privdir), TRUE, FALSE, TRUE);
4277 incpush(":", FALSE, FALSE, TRUE);
4283 incpush(PRIVLIB_EXP, TRUE, FALSE, TRUE);
4285 incpush(PRIVLIB_EXP, FALSE, FALSE, TRUE);
4292 incpush(SITEARCH_EXP, FALSE, FALSE, TRUE);
4299 incpush(SITELIB_EXP, TRUE, FALSE, TRUE);
4301 incpush(SITELIB_EXP, FALSE, FALSE, TRUE);
4306 incpush(SITELIB_STEM, FALSE, TRUE, TRUE);
4313 incpush(PERL_VENDORARCH_EXP, FALSE, FALSE, TRUE);
4319 incpush(PERL_VENDORLIB_EXP, TRUE, FALSE, TRUE); /* this picks up vendorarch as well */
4321 incpush(PERL_VENDORLIB_EXP, FALSE, FALSE, TRUE);
4326 incpush(PERL_VENDORLIB_STEM, FALSE, TRUE, TRUE);
4330 incpush(PERL_OTHERLIBDIRS, TRUE, TRUE, TRUE);
4334 incpush(".", FALSE, FALSE, TRUE);