my @msgs = ( "======== Start =========",
             $stuff,
             $morestuff,
             "======== End ==========" );
openlog( 'status', 'ndelay', 'daemon' );
map { syslog( 'warning', '%s', $_ ) } @msgs;
closelog();