use version; my $max = qv( "3.0.0.0" ); my $min = qv( "2.0.0.0" ); my @versions = ( qv("1.0.0.0"), qv("1.1.10.1"), qv("2.0.0.0"), qv("2.1.0.0"), qv("10.6.1.0"), ); my @constrained_versions = grep { $max >= $_ and $min <= $_ } @versions; print "@constrained_versions\n";