#!/usr/bin/perl -0p

s/^#?listen_addresses = '[^']*'(.*)$/listen_addresses = '*'$1/m or die;