t / t4018 / perl-skip-forward-declon commit distinguish error versus short read from read_in_full() (41dcc4d)
   1package RIGHT;
   2
   3use strict;
   4use warnings;
   5use parent qw(Exporter);
   6our @EXPORT_OK = qw(round finalround);
   7
   8sub other; # forward declaration
   9
  10# ChangeMe