#!/bin/perl my %konfig=(v1 => k1, v2 => k2); my $para = 'konfig'; print %{$para}; print "\n\n"; print %konfig; print "";