✏️ 正在编辑: parent.pm
路径:
/usr/lib/x86_64-linux-gnu/perl-base/parent.pm
提示:
您可以编辑任何文件(包括二进制文件),但请注意不当修改可能导致文件损坏。
package parent; use strict; use vars qw($VERSION); $VERSION = '0.236'; sub import { my $class = shift; my $inheritor = caller(0); if ( @_ and $_[0] eq '-norequire' ) { shift @_; } else { for ( my @filename = @_ ) { s{::|'}{/}g; require "$_.pm"; # dies if the file is not found } } { no strict 'refs'; push @{"$inheritor\::ISA"}, @_; # dies if a loop is detected }; }; 1; __END__
💾 保存文件
← 返回文件管理器