Select Code to Download

use strict;
use warnings;
...
    my $rect = shift;
    return sprintf "R(W=%d, H=%d)", $rect->[0], $rect->[1];
}

R(W=5, H=12) can fit inside R(W=10, H=20)
leftover option 1: R(W=5, H=20) and R(W=5, H=8)
...
R(W=12, H=2) can not fit inside R(W=4, H=0)
R(W=12, H=2) can not fit inside R(W=6, H=8)
R(W=12, H=2) can not fit inside R(W=10, H=0)