[...]
my $textzeile = ($string eq "*") ? () UT::blabla
[...]