Lines Matching full:strict

137 like ($@, qr/\QCan't use string ("foo") as a SCALAR ref while "strict refs" in use\E/);
139 eval 'use 5.11.0; no strict "refs"; ${"foo"} = "bar";';
144 eval 'no strict; use 5.012; ${"foo"} = "bar"';
145 is $@, "", 'explicit "no strict" overrides later ver decl';
146 eval 'use strict; use 5.01; ${"foo"} = "bar"';
148     'explicit use strict overrides later use 5.01';
149 eval 'use strict "subs"; use 5.012; ${"foo"} = "bar"';
151     'explicit use strict "subs" does not stop ver decl from enabling refs';
152 eval 'no strict "subs"; use 5.012; ${"foo"} = "bar"';
153 ok $@, 'no strict subs allows ver decl to enable refs';
154 eval 'no strict "subs"; use 5.012; $nonexistent_pack_var';
155 ok $@, 'no strict subs allows ver decl to enable vars';
156 eval 'no strict "refs"; use 5.012; fancy_bareword';
157 ok $@, 'no strict refs allows ver decl to enable subs';
158 eval 'no strict "refs"; use 5.012; $nonexistent_pack_var';
159 ok $@, 'no strict refs allows ver decl to enable subs';
160 eval 'no strict "vars"; use 5.012; ${"foo"} = "bar"';
161 ok $@, 'no strict vars allows ver decl to enable refs';
162 eval 'no strict "vars"; use 5.012; ursine_word';
163 ok $@, 'no strict vars allows ver decl to enable subs';