✏️ 正在编辑: Generic.pm
路径:
/usr/share/perl5/Mail/Field/Generic.pm
提示:
您可以编辑任何文件(包括二进制文件),但请注意不当修改可能导致文件损坏。
# Copyrights 1995-2016 by [Mark Overmeer <perl@overmeer.net>]. # For other contributors see ChangeLog. # See the manual pages for details on the licensing terms. # Pod stripped from pm file by OODoc 2.02. package Mail::Field::Generic; use vars '$VERSION'; $VERSION = '2.18'; use Carp; use base 'Mail::Field'; sub create { my ($self, %arg) = @_; $self->{Text} = delete $arg{Text}; croak "Unknown options " . join(",", keys %arg) if %arg; $self; } sub parse { my $self = shift; $self->{Text} = shift || ""; $self; } sub stringify { shift->{Text} } 1;
💾 保存文件
← 返回文件管理器