Select Code to Download

#! /usr/bin/perl -w
use strict;
...

#I know the key "fake_key" and I want to print off of it
print $test{fake_key} . "\n";

print %{$test{fake_key}} . "\n";

my %another= %{$test};
print $another{fake_key} . "\n";