+my %group = (
+ core => [qw(
+ cat chgrp chmod chown cp date df ln ls mkdir mknod mktemp mv
+ readlink rm rmdir touch uname
+ )],
+ usr => [qw(
+ base64 basename chcon cksum comm csplit cut dircolors
+ dirname du env expand expr factor fmt fold groups head hostid id
+ install join link logname md5sum mkfifo nice nl nohup nproc numfmt od
+ paste pathchk pinky pr printenv printf ptx realpath runcon seq sha1sum
+ shred shuf sort split stat
+ stdbuf sum tac tail tee test timeout tr truncate tsort tty unexpand
+ uniq unlink users wc who whoami yes
+ )],
+ -usr => [qw(
+ base32 b2sum sha224sum sha256sum sha384sum sha512sum
+ )],
+ bsd => [qw(
+ calendar col column hexdump look ncal
+ )],
+ more => [qw(
+ find xargs free skill htop uptime watch sed awk perl figlet less
+ curl wget ping fping ssh nc
+ )],
+ corerest => [qw(
+ dd pwd sleep stty sync
+ )],
+ git => [map {"git $_"} qw( log status )],
+);
+