perl -E '$r = `perl -E"warn qq[Hello]; print qq[world]"`; say "!$r!"'
Hello at -e line 1.
!world!
$