4 lines
120 B
Perl
4 lines
120 B
Perl
|
use File::Spec::Functions qw(catfile rootdir);
|
||
|
|
my $size1 = -s 'input.txt';
|
||
|
|
my $size2 = -s catfile rootdir, 'input.txt';
|