my $evaluatable = '$date';
my $date = localtime;
my $var = eval "$evaluatable";
print "'$var'\n";