my $var="Some Text";
my $result = sprintf "$var hello world ";
print "$result\n";