✏️ 正在编辑: GroupGenSubclass.pm
路径:
/usr/share/doc/perl-Sub-Exporter/t/lib/Test/SubExporter/GroupGenSubclass.pm
提示:
您可以编辑任何文件（包括二进制文件），但请注意不当修改可能导致文件损坏。
use strict; use warnings; package Test::SubExporter::GroupGenSubclass; use base qw(Test::SubExporter::GroupGen); sub gen_group_by_name { my ($class, $group, $arg, $collection) = @_; my %given = ( class => $class, group => $group, arg => $arg, collection => $collection, ); return { baz => sub { return { name => 'baz-sc', %given }; }, }; } "power overwhelming";
💾 保存文件
← 返回文件管理器