=head1 SYNOPSIS
- use Linux::SysInfo qw/sysinfo/;
+ use Linux::SysInfo qw<sysinfo>;
my $si = sysinfo;
print "$_: $si->{$_}\n" for keys %$si;
=cut
-use base qw/Exporter/;
+use base qw<Exporter>;
our @EXPORT = ();
our %EXPORT_TAGS = (
- 'funcs' => [ qw/sysinfo/ ],
- 'consts' => [ qw/LS_HAS_EXTENDED/ ]
+ 'funcs' => [ qw<sysinfo> ],
+ 'consts' => [ qw<LS_HAS_EXTENDED> ]
);
our @EXPORT_OK = map { @$_ } values %EXPORT_TAGS;
$EXPORT_TAGS{'all'} = [ @EXPORT_OK ];