The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

package HAS_ATTACH;

sub STORABLE_attach {
  ++$attached_count;
  return bless [], 'HAS_ATTACH';
}

++$loaded_count;

1;