a82e89a1bc
Reviewed-on: https://git.avroid.tech/Conan/conan_build/pulls/16 Co-authored-by: aleksandr.vodyanov <aleksandr.vodyanov@avroid.team> Co-committed-by: aleksandr.vodyanov <aleksandr.vodyanov@avroid.team>
12 lines
198 B
Perl
12 lines
198 B
Perl
use strict;
|
|
use warnings;
|
|
|
|
use Path::Tiny;
|
|
|
|
my $dir = path('.');
|
|
my $iter = $dir->iterator;
|
|
print "Hello Conan!\n";
|
|
while (my $file = $iter->()) {
|
|
next if $file->is_dir();
|
|
print "$file\n";
|
|
} |