mymac@Merrills-Mini ~ % sw_vers
ProductName: macOS
ProductVersion: 13.3
BuildVersion: 22E252
mymac@Merrills-Mini ~ %
####
#!/usr/bin/perl
use warnings;
use strict;
use File::Find;
use Cwd;
=pod
=head1 DESCRIPTION
This is a pretty good first attempt at figuring out where your modules are. It is meant to follow the development of _Intermediate Perl_, and I will adhere to the idioms.
=cut
my $current = cwd;
find( \&pm_beneath, $current, );
sub pm_beneath {
use File::Basename;
my $basename = basename($File::Find::name);
return unless $basename =~ /\.pm$/;
print "$File::Find::name\n";
my $access_age = -A $basename;
print " $basename\n";
printf "access age in days: %.2f\n", $access_age;
}
__END__
####
find( \&pm_beneath, "/", );
####
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
ERROR: Can't create '/usr/bin'
Do not have write permissions on '/usr/bin'
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
at -e line 1.
####
Merrills-Mini:Library root# grep '^wheel:.*$' /etc/group | cut -d: -f4
root
####
sudo dseditgroup -o edit -a mymac -t user wheel
####
Merrills-Mac-mini:~ root# ls -lO /System /usr
/System:
total 0
-rw-r--r-- 10 root wheel restricted 0 Apr 1 10:46 .localized
drwxr-xr-x 43 root wheel restricted 1376 Apr 1 10:46 Applications
drwxr-xr-x 4 root wheel restricted 128 Apr 1 10:46 Cryptexes
drwxr-xr-x@ 2 root wheel restricted 64 Apr 1 10:46 Developer
drwxr-xr-x 5 root wheel restricted 160 Apr 1 10:46 DriverKit
drwxr-xr-x 145 root wheel restricted 4640 Apr 1 10:46 Library
drwxr-xr-x 14 root wheel restricted 448 Apr 1 10:46 Volumes
drwxr-xr-x 5 root wheel restricted 160 Apr 1 10:46 iOSSupport
/usr:
total 0
lrwxr-xr-x 1 root wheel restricted 25 Apr 1 10:46 X11 -> ../private/var/select/X11
lrwxr-xr-x 1 root wheel restricted 25 Apr 1 10:46 X11R6 -> ../private/var/select/X11
drwxr-xr-x 936 root wheel restricted 29952 Apr 1 10:46 bin
drwxr-xr-x 32 root wheel restricted 1024 Apr 1 10:46 lib
drwxr-xr-x 347 root wheel restricted 11104 Apr 1 10:46 libexec
drwxr-xr-x 4 root wheel sunlnk 128 Apr 19 20:26 local
drwxr-xr-x 230 root wheel restricted 7360 Apr 1 10:46 sbin
drwxr-xr-x 42 root wheel restricted 1344 Apr 1 10:46 share
drwxr-xr-x 5 root wheel restrexity
icted 160 Apr 1 10:46 standalone
####
mkdir brew
cd brew
git clone https://github.com/Homebrew/brew homebrew
####
mymac@Merrills-Mac-mini ~ % env | grep perl
PATH=/Users/mymac/perl5/bin:/opt/homebrew/bin:/opt/homebrew/sbin:/usr/local/bin:/System/Cryptexes/
...
PERL5LIB=/Users/mymac/perl5/lib/perl5
PERL_LOCAL_LIB_ROOT=/Users/mymac/perl5
PERL_MB_OPT=--install_base "/Users/mymac/perl5"
PERL_MM_OPT=INSTALL_BASE=/Users/mymac/perl5
mymac@Merrills-Mac-mini ~ %
####
bash-3.2$ brew info perl
==> perl: stable 5.36.0 (bottled), HEAD
Highly capable, feature-rich programming language
https://www.perl.org/
(2,494 files, 67MB) *
Poured from bottle using the formulae.brew.sh API on 2023-04-20 at 16:17:27
From: https://github.com/Homebrew/homebrew-core/blob/HEAD/Formula/perl.rb
...
==> Analytics
install: 513 (30 days), 28,031 (90 days), 348,514 (365 days)
install-on-request: 159 (30 days), 7,746 (90 days), 91,325 (365 days)
build-error: 0 (30 days)
bash-3.2$