在这个文件中
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 …Run Code Online (Sandbox Code Playgroud) 我正在阅读GitHub上的CIF(Collective Intelligence Framework)源代码
在文件中src/lib/CIF/Generated.pm.in我看到了这样的声明
use constant PROTOCOL_VERSION => @CIF_PROTOCOL_VERSION@;
Run Code Online (Sandbox Code Playgroud)
为什么有两个标志 @?
package CIF;
use warnings;
use strict;
use constant VERSION => '@CIF_VERSION_MAJOR@.@CIF_VERSION_MINOR@.@CIF_VERSION_PATCH@@CIF_VERSION_META@';
our ($MAJOR_VERSION, $MINOR_VERSION, $PATCH, $META) = VERSION =~ /^(\d+)\.(\d+)\.(\d+)-?([\w\.\d]+)?$/;
use constant PROTOCOL_VERSION => @CIF_PROTOCOL_VERSION@;
use constant ORG => '@ORG@';
use constant DEFAULT_PORT => @DEFAULT_PORT@;
use constant DEFAULT_FRONTEND_PORT => DEFAULT_PORT();
use constant DEFAULT_BACKEND_PORT => (DEFAULT_PORT() + 1);
use constant DEFAULT_PUBLISHER_PORT => (DEFAULT_PORT() + 2);
use constant DEFAULT_STATS_PUBLISHER_PORT => (DEFAULT_PORT() + 3);
our …Run Code Online (Sandbox Code Playgroud) 通过本网站IP到ASN查找,我可以得到关于ASN的一系列结果,但是我找不到BGP前缀的含义。也许我知道它是什么,但是,它是如何工作的?
谁能告诉我BGP前缀在ASN系统中的作用?