- Strength to Increase Rep
- +0
- Strength to Decrease Rep
- -0
- Upvotes Received
- 2
- Posts with Upvotes
- 2
- Upvoting Members
- 2
- Downvotes Received
- 0
- Posts with Downvotes
- 0
- Downvoting Members
- 0
13 Posted Topics
Dear Teddi, your code contains couple of problems 1. input xml is not well formed. (no root element present in this document., etc) 2. calling css is wrong. hence i have coded the sample.xml and sample.css for u. your way of learning is correct. start with css and end with …
Hi Davo, perl compiles the code before running the programme, Even perl is an interpreter, it has its own **compile phase** and **interpreter phase**. The difference between perl and compiled programme is, Perl Compiles the programme each time rather than only once. Thanks and regards, Balaji. C
Hi bharat, try this one use 5.012; my $file1=$ARGV[0]; my $file2=$ARGV[1]; my (%file1, %file2); open (my $in, '<', $file1) or die "cannot open the input file $file1 $!"; while (<$in>){ $file1{$.}=$_; } close $in; open (my $in1, '<', $file2) or die "cannot open the input file $file1 $!"; while (<$in1>){ …
hai sateal8, use hash array instead of array.
Hi, you have 2 remember two things to solve this issue., 1. xml declaraion is optional in xml document. however, if you give the xml declaraion. it should be occurs immediate within the xml document. <?xml version="1.0"?> 2. xsl namespace should be [[url]http://www.w3.org/1999/XSL/Transform][/url] case sensitive. hence try this codes 1. …
Hi, try virtual machine, [url]http://www.vmware.com/[/url]
try This code, [CODE]open my $txt, "<", "$ARGV[0]"; read $txt, my $cont, -s $txt; close $txt; my $first=$1 if ($cont=~m#\Q>first\E$(.*?)\Q>firsta\E$#sm); my $firsta=$1 if ($cont=~m#\Q>firsta\E$(.*)$#sm); my (%first, %firsta); for (my $i=1;$first=~m#(.+)#mg;$i++){ $i=sprintf("%04d", $i); $first{$i}=$1; } for (my $i=1;$firsta=~m#(.+)#g;$i++){ $i=sprintf("%04d", $i); $firsta{$i}=$1; } foreach (sort keys %firsta){ if ($first{$_} ne $firsta{$_}){ print …
Hi Makailah, The code posted by manimuthu is [B]GREAT[/B]!!. but a small correction u should do. and the revised code is [CODE] use strict; use warnings; ### Declare you input file location my $f_path="e:/dani/test1/hash.txt"; ### Declare your Subroutine and the file as a argument my %hash = get_hash ("$f_path"); ### …
Try this code, [CODE]use 5.010; my (@arr, %arr, $row); while(<DATA>){ @arr=split(/\s+/, $_); for (my $i=1; $i<=$#arr; $i++){ $arr{$i}+=$arr[$i]; } $row++; } say ("total of column $_ is $arr{$_} and average is \t", ($arr{$_}/$row)) for (sort keys (%arr)); __DATA__ 1 2 3 4 5 6 6 6 4 4 2 3 …
Hi Dear, First, you have to separate the event timing as <start year="2009" month="12" day="01" hour="00" min="28" sec="30"/> instead of <start>2009-12-01T00:28:30</start>. Then you use sorting the tag based on the timings. Try this. Regards, yuvanbala [QUOTE=geek.shrek;1074898]Hi, I have a multiple xslt process. I would like to divide a group, for …
[QUOTE=manowar83;1069761]Hi, everybody! I want to know if there is a way to resolve my problem. So I want with xpath to get only nodes without their child nodes. My xml is: [code] <ts> <uc> <Questions> <q /> <q /> </Questions> </uc> <uc> <Questions> <q /> <q /> <q /> </Questions> …
The End.