Объявлял как-то переменные и присваивал им пустую строку:
my (
$search_for_name, $search_for_content,
$action_clean, $action_delete,
$action_print, $action_print_key,
$need_help, $need_manual, $verbose
) = ( '' ) x 9;
Надоело при добавлении очередной переменной вручную менять их количество - переписал:
map { $_ = '' } my
(
Read more... )