$bkp = `db2 "list history backup all for $db " |tail -6`; print FILE "\nBackup Information:\n"; if($bkp =~ /Start/) { print FILE $bkp; }