% perl -ne 'print("Line=$.\nName=$1\n"), last if /^ServerName\s+(\S+)\s*$/;' httpd.conf