#!/usr/bin/perl
# Balls bounce when dropped.
#use Mooix::Thing;
run sub {
	my $this=shift;
	return unless $this->super(@_);
	return $this->bounce;
}
