[28053] in Perl-Users-Digest
Perl-Users Digest, Issue: 9417 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Jul 2 03:05:48 2006
Date: Sun, 2 Jul 2006 00:05:04 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 2 Jul 2006 Volume: 10 Number: 9417
Today's topics:
Re: "Inappropriate ioctl for device" while upload()ing latin0511@gmail.com
Re: "Inappropriate ioctl for device" while upload()ing <noreply@gunnar.cc>
[^\s]+ won't match anything: perl 5.8.0 bug or screwed <arifsaha@yahoo.com>
Re: Does recursive call able to print in same page as m <ermeyers@adelphia.net>
new CPAN modules on Sun Jul 2 2006 (Randal Schwartz)
pls help me in finding solution of two problems <ashish.sachan@gmail.com>
Re: pls help me in finding solution of two problems <jurgenex@hotmail.com>
scope trouble <shane@weasel.is-a-geek.net>
Re: scope trouble <sherm@Sherm-Pendleys-Computer.local>
Re: scope trouble xhoster@gmail.com
Re: scope trouble <shane@weasel.is-a-geek.net>
Re: scope trouble xhoster@gmail.com
Re: test value <john@castleamber.com>
XML::Twig <virtualspy3@gmail.com>
Re: XML::Twig <john@castleamber.com>
Re: XML::Twig <virtualspy3@gmail.com>
Re: XML::Twig <john@castleamber.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 1 Jul 2006 16:11:59 -0700
From: latin0511@gmail.com
Subject: Re: "Inappropriate ioctl for device" while upload()ing using CGI.pm
Message-Id: <1151795519.334297.175650@p79g2000cwp.googlegroups.com>
Thank you all! I've managed to fix it.
The problem was that my form declaration in HTML looked like this:
<form action="upload.pl" method="post">
instead of:
<form action="upload.pl" method="post" enctype="multipart/form-data">
Thank you all for your time.
------------------------------
Date: Sun, 02 Jul 2006 01:45:00 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: "Inappropriate ioctl for device" while upload()ing using CGI.pm
Message-Id: <4gofrqF1m7q09U1@individual.net>
latin0511@gmail.com wrote:
> Thank you all! I've managed to fix it.
Good.
> The problem was that my form declaration in HTML looked like this:
> <form action="upload.pl" method="post">
>
> instead of:
> <form action="upload.pl" method="post" enctype="multipart/form-data">
Can't help noticing thst with CGI::UploadEasy, the browser would have
displayed the following error message:
Error
The content-type at file uploads shall be 'multipart/form-data'.
Make sure that the 'FORM' tag includes the attribute:
enctype="multipart/form-data"
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Sat, 01 Jul 2006 23:59:47 GMT
From: S P Arif Sahari Wibowo <arifsaha@yahoo.com>
Subject: [^\s]+ won't match anything: perl 5.8.0 bug or screwed up machine?
Message-Id: <Pine.LNX.4.64.0607011944460.25259@ccc2003>
Hi!
I have this one machine that I help maintain remotely have its
perl 5.8.0 exhibit peculiar behaviour: the pattern [^\s]+ will
not match anything.
Observe this example:
$ cat bug.pl
#!/usr/bin/perl -w
while(<>) {
print "You type:".$_;
if(/([^\s]+)/) {
print "[$1] (".length($1).")\n";
}
else {
print "NONE\n";
}
}
$ echo foo bar | ./bug.pl
You type:foo bar
NONE
$
As comparison, I copied that small program to different systems,
one running newer (v5.8.5) and others run older (v5.6.1) perl.
The result in these systems are different with the first system:
$ echo foo bar | ./bug.pl
You type:foo bar
[foo] (3)
$
Any idea what happen?
I tried reinstall linux from fresh rpm in the first system, but
the result stand. Then I updated to the one from Fedora Legacy
project, but it make no difference.
I have no comparable system either the distribution version nor
the perl version, so I cannot say for sure what is wrong here.
More info:
$ uname -a
Linux rinjani 2.6.10-rinjani #1 Thu Dec 30 11:22:45 CST 2004 i686 i686 i386 GNU/Linux
$ rpm -q perl
perl-5.8.0-90.0.13.legacy
$ cat /etc/*release*
Red Hat Linux release 9 (Shrike)
$ perl -v
This is perl, v5.8.0 built for i386-linux-thread-multi
(with 2 registered patches, see perl -V for more detail)
Copyright 1987-2002, Larry Wall
Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.
Complete documentation for Perl, including FAQ lists, should be found on
this system using `man perl' or `perldoc perl'. If you have access to the
Internet, point your browser at http://www.perl.com/, the Perl Home Page.
$ perl -V
Summary of my perl5 (revision 5.0 version 8 subversion 0) configuration:
Platform:
osname=linux, osvers=2.6.8-1.521smp, archname=i386-linux-thread-multi
uname='linux jan'
config_args='-des -Doptimize=-O2 -g -pipe -march=i386 -mcpu=i686 -Dmyhostname=localhost -Dperladmin=root@localhost -Dcc=gcc -Dcf_by=Red Hat, Inc. -Dinstallprefix=/usr -Dprefix=/usr -Darchname=i386-linux -Dvendorprefix=/usr -Dsiteprefix=/usr -Dotherlibdirs=/usr/lib/perl5/5.8.0 -Duseshrplib -Dusethreads -Duseithreads -Duselargefiles -Dd_dosuid -Dd_semctl_semun -Di_db -Ui_ndbm -Di_gdbm -Di_shadow -Di_syslog -Dman3ext=3pm -Duseperlio -Dinstallusrbinperl -Ubincompat5005 -Uversiononly -Dpager=/usr/bin/less -isr'
hint=recommended, useposix=true, d_sigaction=define
usethreads=define use5005threads=undef'
useithreads=define usemultiplicity=
useperlio= d_sfio=undef uselargefiles=define usesocks=undef
use64bitint=undef use64bitall=un uselongdouble=
usemymalloc=, bincompat5005=undef
Compiler:
cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -I/usr/include/gdbm',
optimize='',
cppflags='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -I/usr/include/gdbm'
ccversion='', gccversion='3.2.2 20030222 (Red Hat Linux 3.2.2-5)', gccosandvers=''
gccversion='3.2.2 200302'
intsize=r, longsize=r, ptrsize=5, doublesize=8, byteorder=1234
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
ivtype='long'
k', ivsize=4'
ivtype=, nvtype='double'
o_nonbl', nvsize=, Off_t='', lseeksize=8
alignbytes=4, prototype=define
Linker and Libraries:
ld='gcc'
l', ldflags =' -L/usr'
libpth=/usr/local/lib /lib /usr/lib
libs=-lnsl -lgdbm -ldb -ldl -lm -lpthread -lc -lcrypt -lutil
perllibs=
libc=/lib/libc-2.3.2.so, so=so, useshrplib=true, libperl=libper
gnulibc_version='2.3.2'
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so', d_dlsymun=undef, ccdlflags='-rdynamic -Wl,-rpath,/usr/lib/perl5/5.8.0/i386-linux-thread-multi/CORE'
cccdlflags='-fPIC'
ccdlflags='-rdynamic -Wl,-rpath,/usr/lib/perl5', lddlflags='s Unicode/Normalize XS/A'
Characteristics of this binary (from libperl):
Compile-time options: DEBUGGING MULTIPLICITY USE_ITHREADS USE_LARGE_FILES PERL_IMPLICIT_CONTEXT
Locally applied patches:
MAINT18379
SPRINTF0 - fixes for sprintf formatting issues - CVE-2005-3962
Built under linux
Compiled at Jan 28 2006 08:04:14
@INC:
/usr/lib/perl5/5.8.0/i386-linux-thread-multi
/usr/lib/perl5/5.8.0
/usr/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi
/usr/lib/perl5/site_perl/5.8.0
/usr/lib/perl5/site_perl
/usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi
/usr/lib/perl5/vendor_perl/5.8.0
/usr/lib/perl5/vendor_perl
/usr/lib/perl5/5.8.0/i386-linux-thread-multi
/usr/lib/perl5/5.8.0
.
$
Thanks!
--
(Stephan Paul) Arif Sahari Wibowo
_____ _____ _____ _____
/____ /____/ /____/ /____
_____/ / / / _____/ http://www.arifsaha.com/
------------------------------
Date: Sat, 01 Jul 2006 18:38:32 -0400
From: "Eric R. Meyers" <ermeyers@adelphia.net>
Subject: Re: Does recursive call able to print in same page as main call
Message-Id: <r-CdnTVJMOP0ZDvZnZ2dnUVZ_vydnZ2d@adelphia.com>
Yohan N. Leder wrote:
> When does a Perl for Win will be stable enough on these fork/threading
> subjects : that is the question !
Windows stable? Your kidding right?
Kill Bill!
------------------------------
Date: Sun, 2 Jul 2006 04:42:13 GMT
From: merlyn@stonehenge.com (Randal Schwartz)
Subject: new CPAN modules on Sun Jul 2 2006
Message-Id: <J1rEED.1MwG@zorch.sf-bay.org>
The following modules have recently been added to or updated in the
Comprehensive Perl Archive Network (CPAN). You can install them using the
instructions in the 'perlmodinstall' page included with your Perl
distribution.
Astro-SpaceTrack-0.020
http://search.cpan.org/~wyant/Astro-SpaceTrack-0.020/
Retrieve orbital data from www.space-track.org.
----
Best-0.06
http://search.cpan.org/~gaal/Best-0.06/
Fallbackable module loader
----
Crypt-CAST5-0.05
http://search.cpan.org/~bobmath/Crypt-CAST5-0.05/
CAST5 block cipher
----
Crypt-CAST5_PP-1.04
http://search.cpan.org/~bobmath/Crypt-CAST5_PP-1.04/
CAST5 block cipher in pure Perl
----
Data-Bind-0.24_01
http://search.cpan.org/~clkao/Data-Bind-0.24_01/
Bind and alias variables
----
Data-FormValidator-4.21_01
http://search.cpan.org/~markstos/Data-FormValidator-4.21_01/
Validates user input (usually from an HTML form) based on input profile.
----
Error-0.16
http://search.cpan.org/~shlomif/Error-0.16/
Error/exception handling in an OO-ish way
----
Finance-Bank-DE-NetBank-1.05
http://search.cpan.org/~rmoriz/Finance-Bank-DE-NetBank-1.05/
Check your NetBank Bank Accounts with Perl
----
Geo-Coder-Google-0.02
http://search.cpan.org/~miyagawa/Geo-Coder-Google-0.02/
Google Maps Geocoding API
----
HTML-Tag-1.05
http://search.cpan.org/~ebruni/HTML-Tag-1.05/
Another HTML Widget system
----
JSAN-Client-0.12
http://search.cpan.org/~adamk/JSAN-Client-0.12/
The JavaScript Archive Network Client Library
----
JSAN-Client-0.13
http://search.cpan.org/~adamk/JSAN-Client-0.13/
The JavaScript Archive Network Client Library
----
JSAN-Mini-0.02
http://search.cpan.org/~adamk/JSAN-Mini-0.02/
Creates a minimal local mirror of JSAN for offline installation
----
JSAN-Parse-FileDeps-0.04
http://search.cpan.org/~adamk/JSAN-Parse-FileDeps-0.04/
Parse file-level dependencies from JSAN modules
----
JSAN-Shell-2.00_04
http://search.cpan.org/~adamk/JSAN-Shell-2.00_04/
JavaScript Archive Network Client Shell
----
Java-JCR-0.06
http://search.cpan.org/~hanenkamp/Java-JCR-0.06/
Use JSR 170 (JCR) repositories from Perl
----
Mail-DomainKeys-0.82
http://search.cpan.org/~anthonyu/Mail-DomainKeys-0.82/
A perl implementation of DomainKeys
----
Parse-RecDescent-Topiary-0.03
http://search.cpan.org/~ivorw/Parse-RecDescent-Topiary-0.03/
tree surgery for Parse::RecDescent autotrees
----
Proc-ProcessTable-0.41
http://search.cpan.org/~durist/Proc-ProcessTable-0.41/
Perl extension to access the unix process table
----
SVN-Agent-0.02
http://search.cpan.org/~bosu/SVN-Agent-0.02/
simple svn manipulation.
----
WWW-Mediawiki-Client-0.31
http://search.cpan.org/~markj/WWW-Mediawiki-Client-0.31/
----
Win32-PowerPoint-0.02
http://search.cpan.org/~ishigaki/Win32-PowerPoint-0.02/
helps to convert texts to PP slides
----
Wx-Perl-Packager-0.02
http://search.cpan.org/~mdootson/Wx-Perl-Packager-0.02/
----
Wx-Perl-Packager-0.03
http://search.cpan.org/~mdootson/Wx-Perl-Packager-0.03/
----
XML-DTD-0.03
http://search.cpan.org/~wohl/XML-DTD-0.03/
Perl module for parsing XML DTDs
----
XML-Twig-3.26
http://search.cpan.org/~mirod/XML-Twig-3.26/
A perl module for processing huge XML documents in tree mode.
----
YAML-0.60
http://search.cpan.org/~ingy/YAML-0.60/
YAML Ain't Markup Language (tm)
----
YAML-Syck-0.60
http://search.cpan.org/~autrijus/YAML-Syck-0.60/
Fast, lightweight YAML loader and dumper
----
YAML-Syck-0.61
http://search.cpan.org/~autrijus/YAML-Syck-0.61/
Fast, lightweight YAML loader and dumper
If you're an author of one of these modules, please submit a detailed
announcement to comp.lang.perl.announce, and we'll pass it along.
This message was generated by a Perl program described in my Linux
Magazine column, which can be found on-line (along with more than
200 other freely available past column articles) at
http://www.stonehenge.com/merlyn/LinuxMag/col82.html
print "Just another Perl hacker," # the original
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: 1 Jul 2006 22:21:26 -0700
From: "ashish.sachan@gmail.com" <ashish.sachan@gmail.com>
Subject: pls help me in finding solution of two problems
Message-Id: <1151817686.439043.229750@m79g2000cwm.googlegroups.com>
Hi i m just starign with PERL..given two problems to solve ..pls help
me in solving them
1. Develop a shell and a perl script to run on a Linux machine. The
script should
take a quoted string as one required argument and one more optional
argument as
a starting directory. Default starting directory will be "/" (the
root directory in
Linux) if the second argument is not provided to the script. The script
should
recursively go through all files under the directory, check the type of
file, and
only for files that are not directories or binary files, search the
file contents for the
quoted string (first argument to the script). The script should print
the "relative"
path of the files (relative to the directory - second argument or
default) in which
the string specified in the first argument is found.
2. Develop a shell and a perl script to print the process-id tree. The
script should take
one numeric value as argument. For example, if the script is run with
argument
12345, then the output should be a complete process tree showing the
process
having PID of 12345, its parent, grandparent, ... and also its child,
grandchild, ...
The output must show the PID, PPID and process name of each process in
the
process tree. Indented output for better readability is desired
------------------------------
Date: Sun, 02 Jul 2006 05:25:48 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: pls help me in finding solution of two problems
Message-Id: <wNIpg.4490$EJ3.652@trnddc06>
ashish.sachan@gmail.com wrote:
> Hi i m just starign with PERL..given two problems to solve ..pls help
> me in solving them
>
> 1. Develop a shell and a perl script to run on a Linux machine. The
> script should
[...]
> 2. Develop a shell and a perl script to print the process-id tree. The
> script should take
Do I smell homework?
jue
------------------------------
Date: Sun, 02 Jul 2006 15:35:09 +1200
From: Shane <shane@weasel.is-a-geek.net>
Subject: scope trouble
Message-Id: <e87ese$9fi$1@lust.ihug.co.nz>
This module has scope issues, but I dont understand how
sub fork_guess {
my $puzzle = shift;
my $element_counter;
my %counted_hash;
my @array_keys;
my ($a, $b);
#Step 1
#loop through everything and find the first key with the lowest value
#ie, the first one with 2 values, or the first with 3
foreach my $listspot(@row_list){
foreach my $element(@{$listspot}){
if ( ref ($puzzle->{ $element }) eq "ARRAY") {
for ($counter=0;$counter <=8;$counter++){
if (defined $puzzle->{$element}[$counter]){$element_counter++}
}
line 234 %counted_hash{$element} = $element_counter;
}
}
}
238 @array_keys = sort {%counted_hash{$a} cmp %counted_hash{$b}}
keys %counted_hash;
print "ARRAY OF KEYS @arra_keys ##";
}
__EOF__
and these are the errors
syntax error at ./attempt3.pl line 234, near "%counted_hash{"
Global symbol "@array_keys" requires explicit package name at ./attempt3.pl
line 238.
Global symbol "%counted_hash" requires explicit package name
at ./attempt3.pl line 238.
syntax error at ./attempt3.pl line 238, near "%counted_hash{"
Global symbol "%counted_hash" requires explicit package name
at ./attempt3.pl line 238.
Execution of ./attempt3.pl aborted due to compilation errors.
--
Rule 6: There is no rule 6
Blog: http://shanes.dyndns.org
------------------------------
Date: Sun, 02 Jul 2006 00:00:56 -0400
From: Sherm Pendley <sherm@Sherm-Pendleys-Computer.local>
Subject: Re: scope trouble
Message-Id: <m2wtawmz9j.fsf@Sherm-Pendleys-Computer.local>
Shane <shane@weasel.is-a-geek.net> writes:
> This module has scope issues, but I dont understand how
You should always fix errors one at a time in the order in which they appear,
and keep in mind that the line numbers reported by Perl are the lines on which
it *detects* an error, which is not always the same line (or even in the same
file) that actually *causes* the error.
Also, error messages after the first aren't 100% reliable; the interpreter
will try to recover and make what it sense it can of the code after an error,
but it can't always do so.
In this case:
> for ($counter=0;$counter <=8;$counter++){
> if (defined $puzzle->{$element}[$counter]){$element_counter++}
> }
There's no opening bracket on that if(). The other errors are likely to be the
result of failed error recovery after the first error.
sherm--
--
Cocoa programming in Perl: http://camelbones.sourceforge.net
Hire me! My resume: http://www.dot-app.org
------------------------------
Date: 02 Jul 2006 04:18:50 GMT
From: xhoster@gmail.com
Subject: Re: scope trouble
Message-Id: <20060702001934.323$e1@newsreader.com>
Shane <shane@weasel.is-a-geek.net> wrote:
> This module has scope issues, but I dont understand how
> sub fork_guess {
> my $puzzle = shift;
> my $element_counter;
> my %counted_hash;
> my @array_keys;
> my ($a, $b);
> #Step 1
> #loop through everything and find the first key with the lowest
> value #ie, the first one with 2 values, or the first with 3
> foreach my $listspot(@row_list){
> foreach my $element(@{$listspot}){
> if ( ref ($puzzle->{ $element }) eq "ARRAY") {
> for ($counter=0;$counter <=8;$counter++){
> if (defined
> $puzzle->{$element}[$counter]){$e
> lement_counter++} }
> line 234 %counted_hash{$element} =
> $element_counter;
> }
> }
> }
> 238 @array_keys = sort {%counted_hash{$a} cmp %counted_hash{$b}}
> keys %counted_hash;
> print "ARRAY OF KEYS @arra_keys ##";
> }
>
> __EOF__
> and these are the errors
> syntax error at ./attempt3.pl line 234, near "%counted_hash{"
You have a syntax error at line 234, near "%counted_hash{". You should
use $, rather than %, when refering to a specific member of a hash.
> Global symbol "@array_keys" requires explicit package name at
> ./attempt3.pl line 238.
The syntax error has caused perl to lose track of its scopes. If you
fix the syntax error, the scope will take care of itself.
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: Sun, 02 Jul 2006 16:34:48 +1200
From: Shane <shane@weasel.is-a-geek.net>
Subject: Re: scope trouble
Message-Id: <e87icp$gsd$1@lust.ihug.co.nz>
xhoster@gmail.com wrote:
> Shane <shane@weasel.is-a-geek.net> wrote:
>> and these are the errors
>> syntax error at ./attempt3.pl line 234, near "%counted_hash{"
>
> You have a syntax error at line 234, near "%counted_hash{". You should
> use $, rather than %, when refering to a specific member of a hash.
>
>
>> Global symbol "@array_keys" requires explicit package name at
>> ./attempt3.pl line 238.
>
> The syntax error has caused perl to lose track of its scopes. If you
> fix the syntax error, the scope will take care of itself.
>
> Xho
>
Indeed perl wanted all the %counted_hash to be $counted_hash (except for the
declaration)
Now the error is
Can't use "my $a" in sort comparison at ./attempt3.pl line 237.
Im trying to sort the keys by value, with a view of later taking the key
with the lowest value and doing things to it.
Am I going about this the right way?
--
Rule 6: There is no rule 6
Blog: http://shanes.dyndns.org
------------------------------
Date: 02 Jul 2006 04:46:41 GMT
From: xhoster@gmail.com
Subject: Re: scope trouble
Message-Id: <20060702004725.049$2g@newsreader.com>
Shane <shane@weasel.is-a-geek.net> wrote:
> xhoster@gmail.com wrote:
>
> > Shane <shane@weasel.is-a-geek.net> wrote:
>
> >> and these are the errors
> >> syntax error at ./attempt3.pl line 234, near "%counted_hash{"
> >
> > You have a syntax error at line 234, near "%counted_hash{". You should
> > use $, rather than %, when refering to a specific member of a hash.
> >
> >
> >> Global symbol "@array_keys" requires explicit package name at
> >> ./attempt3.pl line 238.
> >
> > The syntax error has caused perl to lose track of its scopes. If you
> > fix the syntax error, the scope will take care of itself.
> >
> > Xho
> >
>
> Indeed perl wanted all the %counted_hash to be $counted_hash (except for
> the declaration)
>
> Now the error is
> Can't use "my $a" in sort comparison at ./attempt3.pl line 237.
That one is pretty self explanatory. If you need further help,
try adding "use diagnostics" to the top of the script (or just reading
perldoc perldiag. I get:
Can't use "my $a" in sort comparison at foo line 22 (#1)
(F) The global variables $a and $b are reserved for sort comparisons.
You mentioned $a or $b in the same line as the <=> or cmp operator,
and the variable had earlier been declared as a lexical variable.
Either qualify the sort variable with the package name, or rename the
lexical variable.
In your case, you can simply remove the spurious my ($a,$b)
Xho
--
-------------------- http://NewsReader.Com/ --------------------
Usenet Newsgroup Service $9.95/Month 30GB
------------------------------
Date: 1 Jul 2006 22:15:16 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: test value
Message-Id: <Xns97F3AF83C86E9castleamber@130.133.1.4>
Shane <shane@weasel.is-a-geek.net> wrote:
> Yes I should have posted the full problem from the beginning
> The code is spread over 300+ lines, modular, but still not practical
> to post
Exactly, and common advice is to reduce such problems to just the few
lines that cause the problem. Very often people are able to find the error
themselves that way and save "us" a lot of time :-)
Moreover, 300+ lines sound a lot for something you call modular :-)
--
John Bokma Freelance software developer
&
Experienced Perl programmer: http://castleamber.com/
------------------------------
Date: 1 Jul 2006 17:11:16 -0700
From: "jack" <virtualspy3@gmail.com>
Subject: XML::Twig
Message-Id: <1151799076.257486.20340@v61g2000cwv.googlegroups.com>
Hi,
I am pretty much a newbie to XML::Twig. Been doing all my XML parsing
stuff with XML::Simple untilnow. But, I have to change to XML::Twig as
it can do things for me which XML::Simple can't(like maintaining the
order when writing to an XML file etc) . I am looking for some
documenation for XML::Twig (like how to create a Hash fo the XML after
reading from XML file (eg., XMLin in XML::Simple) ) etc. I would be
thankful if someone can give me some source of documentation to get
started on XML::Twig.
Thanks,
Dheeraj
------------------------------
Date: 2 Jul 2006 00:15:55 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: XML::Twig
Message-Id: <Xns97F3C3F8AB2D3castleamber@130.133.1.4>
"jack" <virtualspy3@gmail.com> wrote:
> Hi,
>
> I am pretty much a newbie to XML::Twig. Been doing all my XML parsing
> stuff with XML::Simple untilnow. But, I have to change to XML::Twig as
> it can do things for me which XML::Simple can't(like maintaining the
> order when writing to an XML file etc) . I am looking for some
> documenation for XML::Twig (like how to create a Hash fo the XML after
> reading from XML file (eg., XMLin in XML::Simple) ) etc. I would be
> thankful if someone can give me some source of documentation to get
> started on XML::Twig.
perldoc XML::Twig
http://www.xmltwig.com/
--
John Bokma Freelance software developer
&
Experienced Perl programmer: http://castleamber.com/
------------------------------
Date: 1 Jul 2006 17:33:13 -0700
From: "jack" <virtualspy3@gmail.com>
Subject: Re: XML::Twig
Message-Id: <1151800393.346861.204570@75g2000cwc.googlegroups.com>
Hi John,
Thanks for you reply. I went through cpan.org, and the xmltwig site but
they dont seem to have any good number examples about how I can access
the functionality. Please let me know.
Thanks,
Jack
John Bokma wrote:
> "jack" <virtualspy3@gmail.com> wrote:
>
> > Hi,
> >
> > I am pretty much a newbie to XML::Twig. Been doing all my XML parsing
> > stuff with XML::Simple untilnow. But, I have to change to XML::Twig as
> > it can do things for me which XML::Simple can't(like maintaining the
> > order when writing to an XML file etc) . I am looking for some
> > documenation for XML::Twig (like how to create a Hash fo the XML after
> > reading from XML file (eg., XMLin in XML::Simple) ) etc. I would be
> > thankful if someone can give me some source of documentation to get
> > started on XML::Twig.
>
> perldoc XML::Twig
>
> http://www.xmltwig.com/
>
> --
> John Bokma Freelance software developer
> &
> Experienced Perl programmer: http://castleamber.com/
------------------------------
Date: 2 Jul 2006 01:58:44 GMT
From: John Bokma <john@castleamber.com>
Subject: Re: XML::Twig
Message-Id: <Xns97F3D567053B0castleamber@130.133.1.4>
"jack" <virtualspy3@gmail.com> wrote:
> Thanks for you reply. I went through cpan.org, and the xmltwig site but
> they dont seem to have any good number examples about how I can access
> the functionality. Please let me know.
Don't top reply (reply under the part you're replying to, remove all lines
that are no longer needed, like my signature, etc.).
http://www.google.com/search?q=XML%3A%3ATwig%20examples
http://www.xmltwig.com/article/
http://www.xmltwig.com/tutorial/
http://www.xmltwig.com/xmltwig/tutorial/
--
John Bokma Freelance software developer
&
Experienced Perl programmer: http://castleamber.com/
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 9417
***************************************
