当前位置:  开发笔记 > 编程语言 > 正文

Perl中是否有关键字'with'?

如何解决《Perl中是否有关键字'with'?》经验,为你挑选了1个好方法。

在这个文件中

https://github.com/csirtgadgets/massive-octo-spice/blob/develop/src/lib/CIF/Observable/Binary.pm ,

我对这句话感到困惑

'CIF :: Observable';

在第9行.在Perl中有关键字'with'吗?这个怎么运作?

package CIF::Observable::Binary;

use strict;
use warnings;

use Mouse;
use Digest::SHA qw/sha256_hex/;

with 'CIF::Observable';

use constant DEFAULT_HASH_TYPE => 'sha256';

has '+otype' => (
default => 'binary',
);  

has 'hash' => (
is      => 'ro',
isa     => 'CIF::Type::Hash',
default => sub { sha256_hex($_[0]->{'observable'}) },
);  

has 'htype' => (
is      => 'ro',
isa     => 'Str',
default => DEFAULT_HASH_TYPE(),
);  

sub process {}
sub understands {
my $self = shift;
my $args = shift;

return unless($args->{'observable'});
return unless($args->{'otype'});
return unless($args->{'otype'} eq 'binary');
return 1;
} 
__PACKAGE__->meta()->make_immutable();

1;

Borodin.. 6

对象系统with使用该关键字Mouse来指示正在定义的类使用指定的角色

MouseMoose对象系统的简化实现,主要是为了减少基于程序所期望的长编译时间Moose

处理角色的方式Mouse几乎与中的相同Moose,Moose::Role文档适用于两个模块



1> Borodin..:

对象系统with使用该关键字Mouse来指示正在定义的类使用指定的角色

MouseMoose对象系统的简化实现,主要是为了减少基于程序所期望的长编译时间Moose

处理角色的方式Mouse几乎与中的相同Moose,Moose::Role文档适用于两个模块

推荐阅读
臭小子
这个屌丝很懒,什么也没留下!
DevBox开发工具箱 | 专业的在线开发工具网站    京公网安备 11010802040832号  |  京ICP备19059560号-6
Copyright © 1998 - 2020 DevBox.CN. All Rights Reserved devBox.cn 开发工具箱 版权所有