#!/usr/bin/perl
#
# This code is used by lib/perl5db.t !!!
#

foo();

sub foo {
  bar();
}


sub bar {
  baz();
}

sub baz {
  1;
}

1;