What is the type of $ttt? Are any of them objects or refs?

Apropos of nothing, you could do the whole loop as one statement:

push @serialOperations, grep { Host::get_cname($_) =~ /Workstation|Ana
+logGateway/ } @syshosts;
[download]