use strict;
use warnings;
use String::Interpolate::Delayed;

my $a = '';
my $str = delayed "Hello $a";
$a = 'Kevin';

print $str;