Here is my not so elegant but gets the job done code.
Code:
ls *.xml > /cygdrive/x/$$tmp
while read filename ; do
#Get Name Tag, first occurance
a=`less $filename|grep Name|head -n1`
#Get only lastname,firstname
b=`echo $a|cut -d"<" -f2|cut -d">" -f2`
#Lastname
d=`echo $b|cut -d"," -f1`
#Firstname
e=`echo $b|cut -d"," -f2`
#remove space before firstname
e=$(sed -e 's/^[[:space:]]*//' <<<"$e")
f="<LastName>$d</LastName>"
g="<FirstName>$e</FirstName>"
sed -bi "/tagaftername/i\ $f" $filename
sed -bi "/tagaftername/i\ $g" $filename
done < /cygdrive/x/$$tmp
rm -f /cygdrive/x/$$tmp
I couldn't get the first occurance code to work so I decided to reverse things and go up instead of down. I looked at the tag right after name which happens to be unique.
Hello,
I'm new in Shell scripting but i should write a script, which inserts the license header out of a txt-File into the files in our Projekt. For the Java classes it runs without Problems but for XML files not. At xml-files i have to put the license Header after the xml-Header (?xml... (1 Reply)
Greetings all,
I am trying to match a string, and after that insert a few lines above that match.
The string is "Version 1.0.0". I need to insert a few lines ONLY above the first match (there are many Version numbers in the file). The rest of the matches must be ignored. The lines I need to... (2 Replies)
Hello,
I have the following variables set in my env
echo $MY_XSD_FILE
/home/jak/sample.xsd
echo $MY_INTERVAL_VALUE
4
I want to insert them between the xml tags in my xml file
cat sample.xml
:::::::::::::::
:::::::::::::::
<property name="FILE"></property>
:::::::::::::::::::::::... (2 Replies)
Hi,
i have an xml file and i want to edit a new sub node in a file
like
val="<activity android:label="@string/app_name" android_name=".MainActivity1" android:launchMode="singleTask" android:screenOrientation="portrait"
... (1 Reply)
Hi!
Considering below text, how would I use sed to insert text right below the v0005-line, using the SEPARATOR-line as a pattern to search for, so two lines above the separator? I can do it right above the separator, but not 2 lines...
# v0004 - Some text
# v0005 - More text
#... (5 Replies)
The below bash connects to a site, downloads a file, searches that file based of user input - could be multiple (all that seems to work). What I am not able to figure out is how to display on the screen match found or no match found" and write a file to a directory (C:\Users\cmccabe\Desktop\wget)... (4 Replies)
Have a file which has the create statement like below
create table emp
( empno integer,
empname char(50))
primary index(empno);
i need to find a string starting with create and ends with semi-colon ;. if so insert the below statement before create statement
rename table emp to emp_rename;... (2 Replies)
i'm using the following code to add the entire content of a file (/tmp/resources.txt) to the line directly below the line containing a pattern (wonderful) in the file mainfile.txt:
sed '/^wonderful/ r /tmp/resources.txt' mainfile.txt
the problem is, it adds the entire content of... (1 Reply)
Hello Team,
I have 2 files.one contains english text and another contains Japanese. so i have to read english text and replace the text with Japanesh text in third file.
Basically, I need a help to write japanese language in text/xml file.I heard wstring does this.Not sure how do i write... (2 Replies)
hi all,
trying this using shell/bash with sed/awk/grep
I have two files, one containing one column, the other containing multiple columns (comma delimited).
file1.txt
abc12345
def12345
ghi54321
...
file2.txt
abc1,text1,texta
abc,text2,textb
def123,text3,textc
gh,text4,textd... (6 Replies)
Discussion started by: shogun1970
6 Replies
LEARN ABOUT DEBIAN
mkdoc::xml::stripper
MKDoc::XML::Stripper(3pm) User Contributed Perl Documentation MKDoc::XML::Stripper(3pm)NAME
MKDoc::XML::Stripper - Remove unwanted XML / XHTML tags and attributes
SYNOPSIS
use MKDoc::XML::Stripper;
my $stripper = new MKDoc::XML::Stripper;
$stripper->allow (qw /p class id/);
my $ugly = '<p class="para" style="color:red">Hello, <strong>World</strong>!</p>';
my $neat = $stripper->process_data ($ugly);
print $neat;
Should print:
<p class="para">Hello, World!</p>
SUMMARY
MKDoc::XML::Stripper is a class which lets you specify a set of tags and attributes which you want to allow, and then cheekily strip any
XML of unwanted tags and attributes.
In MKDoc, this is used so that editors use structural XHTML rather than presentational tags, i.e. strip anything which looks like a <font>
tag, a 'style' attribute or other tags which would break separation of structure from content.
DISCLAIMER
This module does low level XML manipulation. It will somehow parse even broken XML and try to do something with it. Do not use it unless
you know what you're doing.
API
my $stripper = MKDoc::XML::Stripper->new()
Instantiates a new MKDoc::XML::Stripper object.
$stripper->load_def ($def_name);
Loads a definition located somewhere in @INC under MKDoc/XML/Stripper.
Available definitions are:
xhtml10frameset
xhtml10strict
xhtml10transitional
mkdoc16 - MKDoc 1.6. XHTML structural markup
You can also load your own definition file, for instance:
$stripper->load_def ('my_def.txt');
Definitions are simple text files as follows:
# allow p with 'class' and id
p class
p id
# allow more stuff
td class
td id
td style
# etc...
$stripper->allow ($tag, @attributes)
Allows "<$tag>" to appear in the stripped XML. Additionally, allows @attributes to appear as attributes of <$tag>, so for instance:
$stripper->allow ('p', 'class', 'id');
Will allow the following:
<p>
<p class="foo">
<p id="bar">
<p class="foo" id="bar">
However any extra attributes will be stripped, i.e.
<p class="foo" id="bar" style="font-color: red">
Will be rewritten as
<p class="foo" id="bar">
$stripper->disallow ($tag)
Explicitly disallows a tag and all its associated attributes. By default everything is disallowed.
$stripper->process_data ($some_xml);
Strips $some_xml according to the rules that were given with the allow() and disallow() methods and returns the result. Does not modify
$some_xml in place.
$stripper->process_file ('/an/xml/file.xml');
Strips '/an/xml/file.xml' according to the rules that were given with the allow() and disallow() methods and returns the result. Does not
modify '/an/xml/file.xml' in place.
NOTES
MKDoc::XML::Stripper does not really parse the XML file you're giving to it nor does it care if the XML is well-formed or not. It uses
MKDoc::XML::Tokenizer to turn the XML / XHTML file into a series of MKDoc::XML::Token objects and strictly operates on a list of tokens.
For this same reason MKDoc::XML::Stripper does not support namespaces.
AUTHOR
Copyright 2003 - MKDoc Holdings Ltd.
Author: Jean-Michel Hiver
This module is free software and is distributed under the same license as Perl itself. Use it at your own risk.
SEE ALSO
MKDoc::XML::Tokenizer MKDoc::XML::Token
perl v5.10.1 2004-10-06 MKDoc::XML::Stripper(3pm)