sub reset_handler {
    my ($heap, $wheel_id) = @_[HEAP, ARG0 ];
    # I kept a ref to wheel under its ID in the heap
    my $wheel = $heap->{wheel}->{"wheel_$id"};
    my $SELF_FILENAME = $POE::Wheel::FollowTail::SELF_FILENAME();
    my $new_file = derive_new_name();
    $wheel->[$SELF_FILENAME] = $new_file;
    return;
}