Fl::RadioRoundButton - Button with a Radio Circle that Turns Siblings Off


    use Fl;
    my $button = Fl::RadioRoundButton->new(0, 0, 100, 200, 'Hello, World!');
    $button->callback(sub {print q[It's dat boi]} );


The Fl::RadioRoundButton class represents a button that turns on a round light rather than drawing pushed in. The shape of the light is initially set to FL_ROUND_DOWN_BOX. The color of the ligth when on is controlled with selection_color() which defaults to FL_FOREGROUND_COLOR.

This button turns off all other buttons in the same group.


Fl::RadioRoundButton inherits from Fl::RoundButton which in turns inherits from Fl::Button and Fl::Widget. On top of that, it exposes the following methods...


    my $button_a = Fl::RadioRoundButton->new(0, 0, 250, 500, 'Important Stuff');
    my $button_b = Fl::RadioRadioButton->new(0, 0, 250, 500);

The constructor creates a new button using the given position, size, and label.

The destructor removes the button.


Copyright (C) Sanko Robinson.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.


Sanko Robinson <>