#!/usr/bin/perl use strict; use warnings; BEGIN { unshift @INC, sub { warn "Loading $_[1]\n"; push @ARGV, $_[1] } } use File::Copy; print "$^V\n"; print "$_\n" for sort {lc $a cmp lc $b} @ARGV; __END__ v5.18.2 Config.pm Exporter.pm File/Copy.pm File/Spec.pm File/Spec/Unix.pm List/Util.pm overload.pm overloading.pm Scalar/Util.pm vars.pm warnings/register.pm XSLoader.pm > constant.pm > DynaLoader.pm v5.20.3 Config.pm constant.pm DynaLoader.pm Exporter.pm File/Copy.pm File/Spec.pm File/Spec/Unix.pm List/Util.pm overload.pm overloading.pm Scalar/Util.pm vars.pm warnings/register.pm XSLoader.pm < DynaLoader.pm > Cwd.pm v5.26.2 Config.pm constant.pm Cwd.pm Exporter.pm File/Copy.pm File/Spec.pm File/Spec/Unix.pm List/Util.pm overload.pm overloading.pm Scalar/Util.pm vars.pm warnings/register.pm XSLoader.pm < vars.pm > Exporter/Heavy.pm > Time/HiRes.pm v5.28.0 Config.pm constant.pm Cwd.pm Exporter.pm Exporter/Heavy.pm File/Copy.pm File/Spec.pm File/Spec/Unix.pm List/Util.pm overload.pm overloading.pm Scalar/Util.pm Time/HiRes.pm warnings/register.pm XSLoader.pm < List/Util.pm < Scalar/Util.pm > builtin.pm v5.36.0 builtin.pm Config.pm constant.pm Cwd.pm Exporter.pm Exporter/Heavy.pm File/Copy.pm File/Spec.pm File/Spec/Unix.pm overload.pm overloading.pm Time/HiRes.pm warnings/register.pm XSLoader.pm