$  perl -E ' @c = `ls f*.*`; $return_code = `echo $?`; say scalar $return_code;'
0