my $var;
my $date;
...
$var = "date $date";
...
$date = localtime;
...
print $var;