Help for this page

Select Code to Download

Select or download this

sub validate_properties {
    for ( @{$_[0]}  ) {
     $_->{supported} = .5 < rand;
    }

}