=========================================================== .___ __ __ _________________ __ __ __| _/|__|/ |_ / ___\_` __ \__ \ | | \/ __ | | \\_ __\ / /_/ > | \// __ \| | / /_/ | | || | \___ /|__| (____ /____/\____ | |__||__| /_____/ \/ \/ grep rough audit - static analysis tool v2.8 written by @Wireghoul =================================[justanotherhacker.com]=== libspecio-perl-0.46/README.md-31- parent => t('Int'), libspecio-perl-0.46/README.md:32: where => sub { $_[0] > 0 }, libspecio-perl-0.46/README.md-33- ); ############################################## libspecio-perl-0.46/README.md-238- parent => t('Str'), libspecio-perl-0.46/README.md:239: where => sub { $_[0] =~ /foo/i }, libspecio-perl-0.46/README.md-240- ); ############################################## libspecio-perl-0.46/README.md-273-Using Specio with Moo is easy. You can pass Specio constraint objects as libspecio-perl-0.46/README.md:274:`isa` parameters for attributes. For coercions, simply call `$type->coercion_sub`. libspecio-perl-0.46/README.md-275- ############################################## libspecio-perl-0.46/README.md-290- parent => t('Str'), libspecio-perl-0.46/README.md:291: where => sub { $_[0] =~ /^[A-Z]+$/ }, libspecio-perl-0.46/README.md-292- ); ############################################## libspecio-perl-0.46/TODO.md-19-`@_`. This probably means that the sub you write should always look at libspecio-perl-0.46/TODO.md:20:`$_[0]`, which is a little gross when inlining, as it means we have to jam libspecio-perl-0.46/TODO.md-21-things into `@_` with something like: ############################################## libspecio-perl-0.46/lib/Specio/Declare.pm-361- parent => t('Str'), libspecio-perl-0.46/lib/Specio/Declare.pm:362: where => sub { $_[0] =~ /foo/i }, libspecio-perl-0.46/lib/Specio/Declare.pm-363- ); ############################################## libspecio-perl-0.46/lib/Specio/Constraint/Enum.pm-67- libspecio-perl-0.46/lib/Specio/Constraint/Enum.pm:68: return '_Specio_Constraint_Enum_' . refaddr($self); libspecio-perl-0.46/lib/Specio/Constraint/Enum.pm-69-} ############################################## libspecio-perl-0.46/lib/Specio.pm-50- parent => t('Int'), libspecio-perl-0.46/lib/Specio.pm:51: where => sub { $_[0] > 0 }, libspecio-perl-0.46/lib/Specio.pm-52- ); ############################################## libspecio-perl-0.46/lib/Specio.pm-257- parent => t('Str'), libspecio-perl-0.46/lib/Specio.pm:258: where => sub { $_[0] =~ /foo/i }, libspecio-perl-0.46/lib/Specio.pm-259- ); ############################################## libspecio-perl-0.46/lib/Specio.pm-310- parent => t('Str'), libspecio-perl-0.46/lib/Specio.pm:311: where => sub { $_[0] =~ /^[A-Z]+$/ }, libspecio-perl-0.46/lib/Specio.pm-312- ); ############################################## libspecio-perl-0.46/t/anon.t-11- parent => t('Str'), libspecio-perl-0.46/t/anon.t:12: where => sub { length $_[0] }, libspecio-perl-0.46/t/anon.t-13- ); ############################################## libspecio-perl-0.46/t/with-moose.t-37- parent => t('Str'), libspecio-perl-0.46/t/with-moose.t:38: where => sub { $_[0] =~ /^[A-Z]+$/ }, libspecio-perl-0.46/t/with-moose.t-39- ); ############################################## libspecio-perl-0.46/t/with-moose.t-78- parent => t('Str'), libspecio-perl-0.46/t/with-moose.t:79: where => sub { $_[0] =~ /^[A-Z]+$/ }, libspecio-perl-0.46/t/with-moose.t-80- ); ############################################## libspecio-perl-0.46/t/lib/Specio/Library/XY.pm-13- parent => t('Str'), libspecio-perl-0.46/t/lib/Specio/Library/XY.pm:14: where => sub { $_[0] =~ /x/ }, libspecio-perl-0.46/t/lib/Specio/Library/XY.pm-15-); ############################################## libspecio-perl-0.46/t/lib/Specio/Library/XY.pm-19- parent => t('X'), libspecio-perl-0.46/t/lib/Specio/Library/XY.pm:20: where => sub { $_[0] =~ /y/ }, libspecio-perl-0.46/t/lib/Specio/Library/XY.pm-21-); ############################################## libspecio-perl-0.46/t/parameterized.t-101- 'MyInt', libspecio-perl-0.46/t/parameterized.t:102: where => sub { $_[0] =~ /\A-?[0-9]+\z/ }, libspecio-perl-0.46/t/parameterized.t-103- ); ############################################## libspecio-perl-0.46/t/with-moo.t-34- parent => t('Str'), libspecio-perl-0.46/t/with-moo.t:35: where => sub { $_[0] =~ /^[A-Z]+$/ }, libspecio-perl-0.46/t/with-moo.t-36- ); ############################################## libspecio-perl-0.46/t/with-moo.t-75- parent => t('Str'), libspecio-perl-0.46/t/with-moo.t:76: where => sub { $_[0] =~ /^[A-Z]+$/ }, libspecio-perl-0.46/t/with-moo.t-77- );