my %variables= (
    table_name => 'EMPLOYEE', # setting a table name
);

...

$sql=~ s!\$(\w+)!$variables{ $1 } || "\$$1" !ge;
print $sql;