CODEWITHSUNDEEP
bashperlglob
Rugantino
Rugantino

Reputation: 1

Glob pattern works in shell command but not in Perl backticks

I have 3 files in 3 different directories and I need to printout only files from DIR 1 and 2

1 /tmp/CDE/fileA.log
2 /tmp/CFGH/fileB.log
3 /tmp/CILM_NO/fileC.log

if I run from bash /bin/ls /tmp/C{[A-Z][A-Z],[A-Z][A-Z][A-Z]}/*.log it works and I get:

/tmp/CDE/fileA.log  /tmp/CFGH/fileB.log

if I run ls bash command from script perl:

$cmd=`/bin/ls /tmp/C{[A-Z][A-Z],[A-Z][A-Z][A-Z]}/*.log`;
chomp($cmd);
print "$cmd\n";

I receive:

/bin/ls: cannot access /tmp/C{[A-Z][A-Z],[A-Z][A-Z][A-Z]}/*.log: No such file or directory

It looks I need to escape \{ or \, or \} but got the same output and it does not work I also tried using quote instead of escaping but still got same error output It's not a matter of permission, script is 777

Can't sort of it.

Upvotes: 0

Views: 155

Answers (1)

glenn jackman
glenn jackman

Reputation: 246807

(not an answer, an explanation)

In your shell

ls /tmp/C{[A-Z][A-Z],[A-Z][A-Z][A-Z]}/*.log

That uses bash Brace Expansion. Bash will expand that to

ls /tmp/C[A-Z][A-Z]/*.log /tmp/C[A-Z][A-Z][A-Z]/*.log

And then do Filename Expansion

in perl

$cmd=`/bin/ls /tmp/C{[A-Z][A-Z],[A-Z][A-Z][A-Z]}/*.log`;

The backticks will call out to /bin/sh not bash, so the brace expansion will not happen

Upvotes: 3

Related Questions