$stringeinfuegen = 'Hier ist der Inhalt der Stringvariablen eingefügt worden!';

sub Subeinfuegen {
$returnstring = 'Hier wurde der Rückgabewert der Subroutine eingefügt';
return $returnstring;
}

$string = qq($stringeinfuegen und Subeinfeugen());
print $string;