my @files = `find . -ls`; foreach my $line (@lines) { chomp $file; ... }