#!/usr/bin/env perl %test = "test123"; $link = "test"; print %$link, "\n";