Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
...
    return if $min > $max;
    return {min => $min, max => $max};
}

$VAR1 = {
          'min' => 31,
          'max' => 50
        };