display environment variables and PATH in a simple, sane way

sysenv.pl

#!/usr/bin/env perl

use Modern::Perl;
say "$_ : " . $ENV{$_} for ( sort keys %ENV );

say "";
say "System PATH for $^O";
say "";

my $pathdel;
if ( $^O eq 'MSWin32' ) {
    $pathdel = ';';
}
else {
    $pathdel = ':';
}

say $_ for ( split /$pathdel/, $ENV{'PATH'} );