my( $before, $after ) = split /$breakline/, $content, 2;