I improved the SQL, this one here is a bit faster. I also include below changes to your test program, as lines to be added. The DBI connect will inevitably need some tweaking, depending on host machine. 

use DBI;

#my $dbh = DBI->connect or die "hm - $@\n"; # easier when ENV vars are
+ set
my $dbh  = DBI->connect('dbi:Pg:', "app_user1", "P4ss_W0rd1") or die "
+meh - no db connection - $@\n" ;

# two test lines:

is _sql()     , $union;

"SQL/Pg"   => \&_sql,

# and the statement itself
sub _sql  { 

  return $dbh->selectrow_arrayref("

select array_to_string( array(
 select lower(isect) || '-' || upper(isect)-1 from(
  select
      ('['||replace(unnest(string_to_array('$TM_part1', ',')), '-', ',
+')||']')::int4range
    * ('['||replace(unnest(string_to_array('$TM_part2', ',')), '-', ',
+')||']')::int4range 
 ) as h(isect)
), ',')

")->[0] ;

}

[download]

and this is the new result: 

              Rate     Span     Perl   SQL/Pg     Pair oneliner
Span        8373/s       --     -57%     -68%     -86%    -100%
Perl       19261/s     130%       --     -27%     -69%    -100%
SQL/Pg     26397/s     215%      37%       --     -57%    -100%
Pair       61443/s     634%     219%     133%       --     -99%
oneliner 5644800/s   67313%   29207%   21284%    9087%       --

[download]

In reply to Re^2: Create union from ranges, but compare respectively (postgres: int4range-intersect) by erix
in thread Create union from ranges, but compare respectively by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.