Select Code to Download

      my ($x,@y,%z) : Bent = 1;

        use attributes ();
        my ($x,@y,%z);
...
        attributes::->import(__PACKAGE__, \@y, 'Bent');
        attributes::->import(__PACKAGE__, \%z, 'Bent');
        ($x,@y,%z) = 1;

      my ($x,@y,%z) : Bent = (@y);