Select Code to Download

sleep 1 until time - $llent->ll_time >= 1800;
passive_pop("Thirty minutes");
...
sleep 1 until time - $llent->ll_time >= 7200;
passive_pop("Two hours");
tattle_tail();

my %actions = (
  1800 => sub { passive_pop("Thirty minutes"); },
...
  sleep 1 until time - $llent->ll_time >= $duration;
  $actions{$duration}->();
}