[...]
my $icon_loaded;

sub BEGIN
{
  $icon_loaded=0;
  eval { use Text::Iconv; };
  $icon_loaded=1 unless($@);
}
[...]