example:

*use* strict;
*use* warnings;
*use* List::MoreUtils;
*print* List::MoreUtils->VERSION, *"\n"*;

*for* (;;) {
 *eval* { List::MoreUtils::any {*die*} 1 };
}



Attachment: 48669.pl
Description: Perl program

Reply via email to