in reply to Creating an empty hash reference of an empty hash reference

Solved by changing last method to: 

sub _load_posts {
  my $s = shift;

  if ( !-f $s->file ) {
    $s->_set_posts( {} );
  } else {
    my $posts = retrieve $s->file;
    $s->_set_posts($posts);
  }
}

[download]

$PM = "Perl Monk's";
$MCF = "Most Clueless Friar Abbot Bishop Pontiff Deacon Curate Priest";
$nysus = $PM . ' ' . $MCF;
Click here if you love Perl Monks

In Section Seekers of Perl Wisdom