Server IP : 80.87.202.40 / Your IP : 216.73.216.169 Web Server : Apache System : Linux rospirotorg.ru 5.14.0-539.el9.x86_64 #1 SMP PREEMPT_DYNAMIC Thu Dec 5 22:26:13 UTC 2024 x86_64 User : bitrix ( 600) PHP Version : 8.2.27 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /lib64/perl5/vendor_perl/Moose/Exception/ |
Upload File : |
package Moose::Exception::MethodExpectsMoreArgs; our $VERSION = '2.2201'; use Moose; extends 'Moose::Exception'; has 'method_name' => ( is => 'ro', isa => 'Str', required => 1 ); has 'minimum_args' => ( is => 'ro', isa => 'Int', required => 1 ); sub _build_message { my $self = shift; "Cannot call ".$self->method_name." without at least ".$self->minimum_args." argument".($self->minimum_args == 1 ? '' : 's'); } __PACKAGE__->meta->make_immutable; 1;