Help for this page

Select Code to Download

Select or download this

use List::Compare::Functional qw(is_LsubsetR);

...
$result = is_LsubsetR( [ $test2, $source ] );

$result == 1 ? print "\n\$test2 is True" : print "\n\$test2 is False";

Select or download this
```
$test1 is False
$test2 is True
```