Once it's too much → 💥

Had some fun with drawing bouncing balls in Perl using SDL. See the result in a video and code as gist below.

There are three main functions/handler:
on_move() → time tick event where all balls are to be moved, collapsed or exploded
on_even() → is keyboard handling
on_show() → is responsible for redrawing the whole scene.