Don't use $_ as loop variable when calling arbitrary code (RT#81072)

[gitmo/Moo.git] / t / lib / UnderscoreRole.pm

diff --git a/t/lib/UnderscoreRole.pm b/t/lib/UnderscoreRole.pm
new file mode 100644 (file)
index 0000000..3afe0c9
--- /dev/null
+++ b/t/lib/UnderscoreRole.pm
@@ -0,0 +1,5 @@
+package UnderscoreRole;
+use Moo::Role;
+use ClobberUnderscore;
+sub r1 { 'r1' };
+1;