Sciences
Philosophie.
ram.
(OSt)16
####
use strict;
use warnings;
use XML::Twig;
use Data::Dumper;
my $xml = <
01376cam a2200349 4500
2
OCoLC
20060313170419.0
690410s1963 laua b 000 0 eng
63022268
9772597
NLGGC
861755170
(OCoLC)2
(OCoLC)9772597
DLC
DLC
OCLCQ
TSE
OCL
n-us-la
OCLC
GB475.L6
M6
589.3
Morgan, James P.
(James Plummer),
1919-
(OSt)873
Mudlumps at the mouth of South Pass, Mississippi River;
sedimentology, paleontology, structure, origin, and relation to deltaic processes,
by James P. Morgan, James M. Coleman and Sherwood M. Gagliano. Including appendices by R.D. Adams ... et al..
Baton Rouge,
Louisiana State University Press,
1963.
xvi, 190 p.
illus.
28 cm.
Louisiana State University studies.
Coastal studies series ;
no. 10.
(OSt)13
Bibliography: p. 183-190.
Mud lumps
Louisiana
Mississippi River Delta.
(OSt)14
Sediments (Geology)
Louisiana.
(OSt)15
Sciences
Philosophie.
ram.
(OSt)16
Coleman, James M.,
joint author.
(OSt)17
Gagliano, Sherwood M.,
joint author.
(OSt)18
02
OCL
GB475.L6 M6
1
1
XML
my $twig = XML::Twig->new (
twig_roots => {href => \&editHref,},
twig_print_outside_roots => 1,
);
$twig->parse ($xml);
$twig->flush;
sub editHref {
my ($twig, $href) = @_;
my $text = $href->text ();
my $orig = "(OSt)16";
$text =~ s/\.$orig$/(OSt)20/;
$href->set_text ($text);
$href->print ();
}