отказ groupadd при записи изменений в/etc/group

File::Find модуль жемчуга имеет мало если любой, чтобы сделать с find команда. Посмотрите perldoc File::Find поскольку, как использовать его.

Как jordanm указывает, можно использовать find2perl помочь Вам записать это perl код, но обратите внимание на то, что find2perl только распознает стандарт find синтаксис, так обычно не расширения BSD/GNU как -newermt. Необходимо будет написать код жемчуга Вашим сам (вызов stat() для файла и выдерживают сравнение mtime с POSIX::mktime(0,0,0,12,2,113)).

Работать find команда, Вам не нужно File::Find модуль, можно просто сделать:

my $srceDir = "//mnt/Share_Drive/Verizon PM&T/Capture Files/";
my @find_cmd = ("find", $srceDir, "-type", "f", "-newermt", "12 Feb 2013", "-print0");

open FIND, "-|", @find_cmd;
$/ = "\0";
my @files = <FIND>; chomp @files;
my $ret = close FIND or warn $! ?
    "Error closing find pipe: $!" :
    "find exited with non-zero exit status: $?";