private hash
Default perl lines for the pod_headers of the file
USE
NOTES
Examples
SYNOPSIS
SEISMIC UNIX NOTES'. "\n";
if ( $sunix_package_pod_header->{_prog_docs} ) {
# add a NEW LINE character to each element of the array
my $prog_docs_aref = $sunix_package_pod_header->{_prog_docs};
my @prog_docs = @$prog_docs_aref;
my $length = scalar @prog_docs;
my $last_line = $length + 1;
for ( my $i = 0; $i < $length; $i++) {
# print("set_header\n");
$head[0] = $head[0] . $prog_docs[$i] . "\n\n";
# print("sunix_package_pod_header,prog_docs,line#$i : $head[0]");
}
# print("sunix_package_pod_header,prog_docs,line#0 : $head[0]");
$head[0] = $head[0] .
'=head2 User\'s notes (Juan Lorenzo) untested