my $pid = open '-|', my $pipe, 'ls', '-r' or die $!;