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