my $io = IO::All->new();
$io->dir($dir);
say for $io->all;

##</code><code>##

#!/usr/bin/env perl 

use strict;
use warnings;
use IO::All;
use Cwd;
use feature qw(say);

my $dir = cwd;

say for io($dir)->all;

my $io = IO::All->new();

$io->dir($dir);

say for $io->all;

__END__

karls-mac-mini:Desktop karl$ ./io.pl 
...tons of stuff under /Users/karl/Desktop/
Can't use an undefined value as a subroutine reference at /Users/karl/perl5/perlbrew/perls/perl-5.20.0threads/lib/site_perl/5.20.0/IO/All/Dir.pm line 167

##</code><code>##

my $io = $self->constructor->(File::Spec->catfile($self->pathname, $name));