Help for this page

Select Code to Download


  1. or download this
    my $template = 'B' . @array1;
    my $v1 = pack $template, join "", @array1;
    my $v2 = pack $template, join "", @array2;
    my @array_result = split //, unpack $template, $v1 | $v2;