in reply to Objet Reference ^%#)#&* dissapers

You don't show where
$self->{FKS}[0]
is set so much as
$self->{FKS}[-1]
(assuming FK->new failed! isn't in the log file)

What's scalar(@{ $self->{FKS} }) at "HERE"?