use PDL; my $pdl_a = pdl 10..20; my $pdl_b = pdl 15..18; print "$pdl_a\n$pdl_b\n";