try it this way:

  my ( $avg ) = $dbh->selectrow_array(q{
    SELECT avg(ERWWCOMMUNITIES_Memory_Pages_sec) FROM prospects});
[download]

Read DBI.