А что такое isset() ? :)))

>Как узнать, была ли объявлена переменная и содержит ли она значение?
>Смысл таков:
>Если всё нормально, то в переменную записывается значение, если нет, то не
>записывается, в конце идёт проверка этого значения.

Думаю что проще всего это сделать через хеш:

print "Exists" if exists $something{"One"}; # Переменная с ключем One существует
print "Defined" if defined $something{"One"}; # Переменная определена

%something=();
while(<>) {
  chomp;
  next if exists $something{$_};
  $something{$_} = -s $_;
}