=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libmoosex-method-signatures-perl-0.49/lib/MooseX/Method/Signatures/Meta/Method.pm-236- my $code = eval "sub {${cb}}"; libmoosex-method-signatures-perl-0.49/lib/MooseX/Method/Signatures/Meta/Method.pm:237: $tc = subtype({ as => $tc, where => $code }); libmoosex-method-signatures-perl-0.49/lib/MooseX/Method/Signatures/Meta/Method.pm-238- } ############################################## libmoosex-method-signatures-perl-0.49/lib/MooseX/Method/Signatures.pm-493- Str $bar = "apan", libmoosex-method-signatures-perl-0.49/lib/MooseX/Method/Signatures.pm:494: Int :$baz! = 42 where { $_ % 2 == 0 } where { $_ > 10 } ) libmoosex-method-signatures-perl-0.49/lib/MooseX/Method/Signatures.pm-495- ############################################## libmoosex-method-signatures-perl-0.49/t/synopsis.t-33- Str $bar = "apan", libmoosex-method-signatures-perl-0.49/t/synopsis.t:34: Int :$baz! = 42 where { $_ % 2 == 0 } where { $_ > 10 } ) { return $bar . ':' . $baz } libmoosex-method-signatures-perl-0.49/t/synopsis.t-35- ############################################## libmoosex-method-signatures-perl-0.49/t/where.t-15- method m1(Str $arg where { $_ eq 'foo' }) { $arg } libmoosex-method-signatures-perl-0.49/t/where.t:16: method m2(Int $arg where { $_ == 1 }) { $arg } libmoosex-method-signatures-perl-0.49/t/where.t-17- method m3(Foo::Bar $arg where { $_->baz eq 'quux' }) { $arg->baz } ############################################## libmoosex-method-signatures-perl-0.49/t/where.t-19- method m4(Str :$arg where { $_ eq 'foo' }) { $arg } libmoosex-method-signatures-perl-0.49/t/where.t:20: method m5(Int :$arg where { $_ == 1 }) { $arg } libmoosex-method-signatures-perl-0.49/t/where.t-21- method m6(Foo::Bar :$arg where { $_->baz eq 'quux' }) { $arg->baz }