Insert appropriate directory path instead of $directory then cast the command.

perl -e '!-s&&unlink $_ for<$directory/*>'
[download]