#!/usr/bin/perl
$output=`ps auxww | grep postgres | grep -i "[W]aiting"`;
if (length $output < 1) { print "No queries waiting"; exit 0; }
else { print $output; exit 2; }

