use vars '$varname', '@varname';