my $cnt = glob "/home/a/*.txt";

Unfortunately, no. It would be more intuitive that way, but the real behavior of that is to set $cnt to the first filename in the list of exansions.

$ touch {a,b,c}.txt; perl -le 'my $c = glob "*.txt"; print $c'
a.txt
[download]

$ touch {a,b,c}.txt; perl -le 'my $c =()= glob "*.txt"; print $c'
3
[download]

-sauoq
"My two cents aren't worth a dime.";