> #!/bin/sh
> mkdir /tmp/src_dir
> mkdir /tmp/dst_dir
> touch /tmp/src_dir/2014-06-21 /tmp/src_dir/2014-06-22 /tmp/src_dir/2014-06-23
> cp /tmp/src_dir/2014-06-21 /tmp/src_dir/2014-06-22 /tmp/dst_dir/
> /tmp/script.pl
> Может по разному понимаем src и dst ((
> От жары у меня мозг плавится ))

Возможно, я не точно описал задание.

Дело в том,что в src_dir(директория откуда файлы будут копироваться) имя файлов не содержат никакой даты.
А уже после копирования этих файлов в dst_dir к имени каждого файла из src_dir добавляется дата копирования.

Т.е скрипт должен проверить есть ли для каждого файла из src_dir копия за вчерашний день в dst_dir, ну и на вывести имя файла из src_dir,который не был скопирован\отсутствует в dst_dir.
Но опять же, opendir() юзать нельзя, значит скорее всего надо строки сравнивать.

> От жары у меня мозг плавится ))

Косяк. Не внимателен был.

Так попробуйте.

#!/usr/bin/perl
use strict;
use warnings;
use POSIX;

my $srcd = "/tmp/src_dir";
my $dstd = "/tmp/dst_dir";
my $yesterday = strftime "%F", localtime(time-86400);
my @src;
open SRC, "-|", "ls $srcd";
while(<SRC>) {
    chomp;
    push @src, $_;
}
close SRC;

my @dst;
open DST, "-|", "ls $dstd";
while(<DST>) {
    chomp;
    push @dst, $_ if /$yesterday/;
}
close DST;
my %seen;
foreach my $file (@dst) {$seen{$file} = 1}
foreach my $file (@src) {
    unless ($seen{"$file-$yesterday"}) {
        print "File $file-$yesterday not found!\n";
    }
}

Жара ))