$strref = \qq(Labersülz);
$arrayref = \("eins", "zwei", "drei");

print ${$strref}, "\n";
print join(",",@{$arrayref}), "\n";