Select Code to Download

sub exists { ## no critic
    my $self = shift;
...
    print Dumper (-e $self->path);
    return -e $self->path ? 1 : 0;
}

$VAR1 = '/Users/bigo/perl5/my_modules/t/Dir/tmp/';
$VAR1 = !!1;