package CheckCheck;
use strict;
use warnings;

*INSTALLED = sub { print "EVERYTHING IS OK\n"; };

sub AUTOLOAD {
  warn INSTALLED();
}

sub GO_GO_GO {
  INSTALLED();
}

CHECK { GO_GO_GO() }

1;