Select Code to Download

package Potato;
use constant tuber => 1;

...

package main;
print Potato::tuber, Peach::tuber;

use constant visited_urls => {};
...
unless ( visited_urls->{$my_url} ++ ) {
  ...
}