[31072] in Perl-Users-Digest
Perl-Users Digest, Issue: 2317 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Apr 3 16:09:48 2009
Date: Fri, 3 Apr 2009 13:09:10 -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 Fri, 3 Apr 2009 Volume: 11 Number: 2317
Today's topics:
Re: How to find directory of package residence from wit <schaitan@gmail.com>
Re: How to find directory of package residence from wit <glex_no-spam@qwest-spam-no.invalid>
Re: How to find directory of package residence from wit <noreply@gunnar.cc>
lexical dump? <oldyork90@yahoo.com>
Re: lexical dump? <ben@morrow.me.uk>
Re: lexical dump? <oldyork90@yahoo.com>
Re: Perl symantics (Randal L. Schwartz)
Re: Perl symantics (Tim McDaniel)
Re: Perl symantics <cartercc@gmail.com>
Re: Perl symantics <hjp-usenet2@hjp.at>
Re: Perl UNIX/Linux API <tadmc@seesig.invalid>
Re: Perl UNIX/Linux API <uri@stemsystems.com>
Re: Perl UNIX/Linux API <n@solenttechnology.co.uk>
sftp; Emits a warning if the operation fails. <oldyork90@yahoo.com>
URI queries with varied amounts of named values <devrick88@gmail.com>
Re: URI queries with varied amounts of named values <jimsgibson@gmail.com>
Re: URI queries with varied amounts of named values <cartercc@gmail.com>
Re: URI queries with varied amounts of named values <devrick88@gmail.com>
Re: XRC vs Perl (GUI) generated code <cartercc@gmail.com>
Re: XRC vs Perl (GUI) generated code <cartercc@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 3 Apr 2009 05:07:16 -0700 (PDT)
From: Krishna Chaitanya <schaitan@gmail.com>
Subject: Re: How to find directory of package residence from within package?
Message-Id: <9fb7cd3a-e9aa-47dc-b39d-f9eac96c4ec3@j18g2000prm.googlegroups.com>
> One way may be to make use of the %INC hash.
>
> =A0 =A0 =A0( my $pwd =3D $INC{'WIP/Test.pm'} ) =3D~ s/Test\.pm//;
That gives only relative path (i.e. WIP). I've slightly modified it
as:
package WIP::test::abc;
use warnings;
use strict;
use Cwd qw(abs_path);
my $pwd =3D undef;
BEGIN {
my $pkg =3D __PACKAGE__;
$pkg =3D~ s|::|/|g;
$pkg =3D $pkg . ".pm";
( $pwd =3D abs_path($INC{$pkg}) ) =3D~ m|^(.+)/|;
$pwd =3D $1;
print "Module is located at $pwd\n";
}
Thanks, Gunnar.
------------------------------
Date: Fri, 03 Apr 2009 09:54:26 -0500
From: "J. Gleixner" <glex_no-spam@qwest-spam-no.invalid>
Subject: Re: How to find directory of package residence from within package?
Message-Id: <49d62322$0$33220$815e3792@news.qwest.net>
Krishna Chaitanya wrote:
> That gives only relative path (i.e. WIP). I've slightly modified it
> as:
Just curious. Why do you need to know the full path to the
module?
------------------------------
Date: Fri, 03 Apr 2009 19:19:13 +0200
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: How to find directory of package residence from within package?
Message-Id: <73muotFv1556U1@mid.individual.net>
Krishna Chaitanya wrote:
>> One way may be to make use of the %INC hash.
>>
>> ( my $pwd = $INC{'WIP/Test.pm'} ) =~ s/Test\.pm//;
>
> That gives only relative path (i.e. WIP).
Not on my Perl installations, and I would be very surprised if that was
the case for you.
$ perl -MCwd -le 'print "$_ = $INC{$_}" for keys %INC'
XSLoader.pm = /usr/lib/perl5/5.10.0/i686-linux/XSLoader.pm
warnings.pm = /usr/lib/perl5/5.10.0/warnings.pm
warnings/register.pm = /usr/lib/perl5/5.10.0/warnings/register.pm
Cwd.pm = /usr/lib/perl5/5.10.0/i686-linux/Cwd.pm
vars.pm = /usr/lib/perl5/5.10.0/vars.pm
Exporter.pm = /usr/lib/perl5/5.10.0/Exporter.pm
strict.pm = /usr/lib/perl5/5.10.0/strict.pm
$
What does that code output for you?
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Fri, 3 Apr 2009 08:14:00 -0700 (PDT)
From: okey <oldyork90@yahoo.com>
Subject: lexical dump?
Message-Id: <d76c19a8-202d-40ed-8503-5ac6101a58cd@o11g2000yql.googlegroups.com>
Outside of a debugger, can you list all the lexicals in scope? Vars
declared with my don't show up in main::, the package I am using.
(Lexical is the proper term?)
Thanks.
------------------------------
Date: Fri, 3 Apr 2009 16:39:06 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: lexical dump?
Message-Id: <q5nha6-ia52.ln1@osiris.mauzo.dyndns.org>
Quoth okey <oldyork90@yahoo.com>:
> Outside of a debugger, can you list all the lexicals in scope? Vars
> declared with my don't show up in main::, the package I am using.
> (Lexical is the proper term?)
Lexical is the proper term, and yes, you can do it with PadWalker. I
have to ask why you think you need to, though.
Ben
------------------------------
Date: Fri, 3 Apr 2009 11:46:19 -0700 (PDT)
From: okey <oldyork90@yahoo.com>
Subject: Re: lexical dump?
Message-Id: <052edf14-d653-42a0-8901-3c731d144955@r18g2000vbi.googlegroups.com>
On Apr 3, 10:39=A0am, Ben Morrow <b...@morrow.me.uk> wrote:
> Quoth okey <oldyor...@yahoo.com>:
>
> > Outside of a debugger, can you list all the lexicals in scope? =A0Vars
> > declared with my don't show up in main::, the package I am using.
> > (Lexical is the proper term?)
>
> Lexical is the proper term, and yes, you can do it with PadWalker. I
> have to ask why you think you need to, though.
>
Probably not the best way
of doing things, but a dump of everything right in your face is a
quick way
for us to check things out when the site craps out. Anyway, works for
us.
Thanks for the info
------------------------------
Date: Fri, 03 Apr 2009 07:55:33 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: Perl symantics
Message-Id: <86k561n5wa.fsf@blue.stonehenge.com>
>>>>> "sln" == sln <sln@netherlands.com> writes:
sln> There's been written guidelines naming 'C/C++' style
sln> variables based on type.
sln> Perl seems to be all caps, first letter caps, no caps.
sln> And that is it.
sln> What's that all about?
In C/C++, the *variables* are typed, and as the programmer, you have to be
aware of that almost constantly, or you can't even enter valid code. Hence,
people come up with naming schemes for variables so they can do the work that
should be done by automation. :)
In Perl, the *values* are typed, and you're free to say what you mean, and the
runtime system just *does the right thing*, and your productivity is
dramatically increased.
I still don't understand why people like typed variables. :(
print "Just another Perl hacker,"; # and smalltalk, and lisp, and python ...
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Smalltalk/Perl/Unix consulting, Technical writing, Comedy, etc. etc.
See http://methodsandmessages.vox.com/ for Smalltalk and Seaside discussion
------------------------------
Date: Fri, 3 Apr 2009 16:37:17 +0000 (UTC)
From: tmcd@panix.com (Tim McDaniel)
Subject: Re: Perl symantics
Message-Id: <gr5dvt$adc$1@reader1.panix.com>
In article <86k561n5wa.fsf@blue.stonehenge.com>,
Randal L. Schwartz <merlyn@stonehenge.com> wrote:
>I still don't understand why people like typed variables.
For me, I like the sanity checking that can happen with strong typing.
If I know that variable "count" is used for the count of the number of
items that it's supposed to process, for examle, then I know it should
contain only an integer and I'd really like to know if code tries to
assign 'frog' to it, ideally at compile time.
I'd like to try stronger enforced assertions, like "this must be an
integer >= 0". I hope someone will reply with the five Perl CPAN
modules that implement such notions.
--
Tim McDaniel, tmcd@panix.com
------------------------------
Date: Fri, 3 Apr 2009 10:58:39 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: Re: Perl symantics
Message-Id: <c360e126-8926-4170-a98d-a99f11064812@z19g2000yqe.googlegroups.com>
On Apr 3, 10:55=A0am, mer...@stonehenge.com (Randal L. Schwartz) wrote:
> print "Just another Perl hacker,"; # and smalltalk, and lisp, and python =
...
Your opinion, please.
I've made an effort to learn Lisp in the past year and am now writing
some small scripts in Lisp. I've also played with Erlang and Clojure,
and am inclined to give priority to Erlang because (1) it seems to do
better with multi core processors, and (2) I have very little need for
Java libraries that Clojure provides. Do you have an opinion as to the
future of Lisp/Erlang/Clojure?
In an interview recently, Tim Bray said that he had switched from Perl
to Ruby. Do you have an opinion as to the future of Perl/Python/Ruby?
I guess I'm a little curious as to Parrot, whether it will be able to
compete with the JVM and the CLR.
CC
------------------------------
Date: Fri, 3 Apr 2009 20:17:49 +0200
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: Perl symantics
Message-Id: <slrngtckmd.rmg.hjp-usenet2@hrunkner.hjp.at>
On 2009-04-03 16:37, Tim McDaniel <tmcd@panix.com> wrote:
> In article <86k561n5wa.fsf@blue.stonehenge.com>,
> Randal L. Schwartz <merlyn@stonehenge.com> wrote:
>>I still don't understand why people like typed variables.
>
> For me, I like the sanity checking that can happen with strong typing.
> If I know that variable "count" is used for the count of the number of
> items that it's supposed to process, for examle, then I know it should
> contain only an integer and I'd really like to know if code tries to
> assign 'frog' to it, ideally at compile time.
Yup, the ability to catch such errors at compile time is the big
advantage of typed variables. While it is theoretically possible to
catch many such errors by static analysis of the program code (and some
newer dynamically typed languages do this) it is expensive and you don't
want to do this every time a script is executed.
> I'd like to try stronger enforced assertions, like "this must be an
> integer >= 0". I hope someone will reply with the five Perl CPAN
> modules that implement such notions.
Smart::Comments comes to mind, although I haven't used it myself. I just
sprinkle my scripts with lots of 'die "bla" unless $foo;' statements.
hp
------------------------------
Date: Fri, 3 Apr 2009 06:20:09 -0500
From: Tad J McClellan <tadmc@seesig.invalid>
Subject: Re: Perl UNIX/Linux API
Message-Id: <slrngtbs79.hcn.tadmc@tadmc30.sbcglobal.net>
neilsolent <n@solenttechnology.co.uk> wrote:
> I am looing for Perl code
Now _that_ is an unfortunate typo...
> to replace common UNIX/Linux functions.
http://use.perl.org/~cwest/journal/20025
http://search.cpan.org/dist/ppt/
http://ppt.sourceforge.net/
Though rather oldish, and I don't see "df" listed there.
A more recent sighting:
http://freshmeat.net/projects/ppt
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.noitatibaher\100cmdat/"
------------------------------
Date: Fri, 03 Apr 2009 08:31:02 -0500
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Perl UNIX/Linux API
Message-Id: <x7iqll27ah.fsf@mail.sysarch.com>
>>>>> "TJM" == Tad J McClellan <tadmc@seesig.invalid> writes:
TJM> http://use.perl.org/~cwest/journal/20025
TJM> http://search.cpan.org/dist/ppt/
TJM> http://ppt.sourceforge.net/
TJM> http://freshmeat.net/projects/ppt
and the OP didn't search cpan which has modules for most/all of those
common unix utilities. these showed up when i searched for df:
Filesys::Df
Filesys::DiskSpace
Filesys::DiskFree
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.sysarch.com --
----- Perl Code Review , Architecture, Development, Training, Support ------
--------- Free Perl Training --- http://perlhunter.com/college.html ---------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------
------------------------------
Date: Fri, 3 Apr 2009 12:48:18 -0700 (PDT)
From: neilsolent <n@solenttechnology.co.uk>
Subject: Re: Perl UNIX/Linux API
Message-Id: <3f49eb14-85ce-41fa-bf7e-460be655c1f6@n17g2000vba.googlegroups.com>
Thanks for the replies.
I did check CPAN actually, but I wasn't directly searching for df at
the time - that was just one example.
I was hoping to stumble across a whole library of tools - looks like
ppt is the most likely answer.
------------------------------
Date: Fri, 3 Apr 2009 12:33:46 -0700 (PDT)
From: okey <oldyork90@yahoo.com>
Subject: sftp; Emits a warning if the operation fails.
Message-Id: <93b253d4-d898-471f-8dfc-2a4fad996b2f@e2g2000vbe.googlegroups.com>
Changing to net::sftp from ftp. What does this mean (in discussing
how a particular method fails)
Emits a warning if the operation fails.
Are they talking about the return status?, or is there something else
that must be captured or monitored?
Thank you
Example text: =============
$sftp->do_remove($path)
Sends a SSH_FXP_REMOVE command to remove the remote file $path.
Emits a warning if the operation fails.
Returns the status code for the operation. To turn the status code
into a text message, take a look at the fx2txt function in
Net::SFTP::Util.
------------------------------
Date: Fri, 3 Apr 2009 08:56:58 -0700 (PDT)
From: rickle <devrick88@gmail.com>
Subject: URI queries with varied amounts of named values
Message-Id: <068cfc67-a7e5-42af-b5f3-e52d7a122ae1@j12g2000vbl.googlegroups.com>
I'm looking for some assistance from the perl folk out there. I am a
perl hack who writes a few scripts a year in perl only when needed.
This seems like a job best suited for perl (most likely a hash) but I
am fumbling around more then I would like to be. I'm sure this is
very simple for anyone well versed in perl.
Objective:
Take a list of named values and put them into a CSV file. When there
isn't a named value there should just be an empty CSV slot. There
might also be some entries on the same line that are somewhat
duplicated, where if there is one entry it should always trump the
other. The CSV file will always have 7 possible entries in the CSV.
language,format,country,zip,category,ua,id
Problem:
The named values vary by line so there is never just X per line. Some
will have just X, some will be X+1, X+5, some will be empty, etc.,
etc.
Example file:
l=en&format=xhtml
format=xml&country=US&ua=Mozilla
l=sp&zip=00000&category=books
l=en&format=xml&id=xyz
l=fr&country=US&alt-country=CA # in this case we want the alt-
country to populate the country field
Example output:
en,xhtml,,,,,,
,xml,US,,,Mozilla,
sp,,,00000,books,,
en,xml,,,,,xyz
fr,,CA,,,,,
I have tried playing around with the URI perl module but haven't had
much luck. I have also made some attempts on my own but I am just not
getting things right. I know this is probably better suited to a hash
but I am very hash illiterate. I can perform basic functions in
hashes and do simple stuff but I don't play around with perl enough to
have gotten any better.
foreach (@DATA_SET) {
next unless /\S/; # strip out blank lines, i.e. no named
values
# print "$_\n";
#$format = m/format=xml/;
#my $format =~ /format=xml/;
#print $_;
#print "$format\n";
}
I also tried pushing the results to another function and doing some
work there but it didn't go well as you can see from how I ended up
completely commenting it out.
#sub string_analysis {
#my (@DATA_RESULTS) = @_;
#@DATA_RESULTS = split(/&/,$_ [0]);
#print "@DATA_RESULTS\n";
#while(@DATA_RESULTS){
# foreach (split/&/,$S)[0]){
# print "$DATA_RESULTS[1]\n";
# }
#}
# push (@SPLIT_DATA_RESULTS = split(/\&/,$_));
#}
#while (@SPLIT_DATA_RESULTS) {
# print "$_\n";
#}
#my @DATA_STRING = split /&/, @fields[9];
#print "@DATA_STRING[1], @DATA_STRING[2], @DATA_STRING[3],
@DATA_STRING[4], @DATA_STRING[5], @DATA_STRING[6], @DATA_STRING[7],
@DATA_STRING[8]\n";
#}
Any help would be greatly appreciated.
------------------------------
Date: Fri, 03 Apr 2009 10:00:54 -0700
From: Jim Gibson <jimsgibson@gmail.com>
Subject: Re: URI queries with varied amounts of named values
Message-Id: <030420091000547289%jimsgibson@gmail.com>
In article
<068cfc67-a7e5-42af-b5f3-e52d7a122ae1@j12g2000vbl.googlegroups.com>,
rickle <devrick88@gmail.com> wrote:
> I'm looking for some assistance from the perl folk out there. I am a
> perl hack who writes a few scripts a year in perl only when needed.
> This seems like a job best suited for perl (most likely a hash) but I
> am fumbling around more then I would like to be. I'm sure this is
> very simple for anyone well versed in perl.
>
> Objective:
> Take a list of named values and put them into a CSV file. When there
> isn't a named value there should just be an empty CSV slot. There
> might also be some entries on the same line that are somewhat
> duplicated, where if there is one entry it should always trump the
> other. The CSV file will always have 7 possible entries in the CSV.
> language,format,country,zip,category,ua,id
>
> Problem:
> The named values vary by line so there is never just X per line. Some
> will have just X, some will be X+1, X+5, some will be empty, etc.,
> etc.
>
> Example file:
> l=en&format=xhtml
> format=xml&country=US&ua=Mozilla
> l=sp&zip=00000&category=books
> l=en&format=xml&id=xyz
>
> l=fr&country=US&alt-country=CA # in this case we want the alt-
> country to populate the country field
>
> Example output:
> en,xhtml,,,,,,
> ,xml,US,,,Mozilla,
> sp,,,00000,books,,
> en,xml,,,,,xyz
> fr,,CA,,,,,
>
> I have tried playing around with the URI perl module but haven't had
> much luck. I have also made some attempts on my own but I am just not
> getting things right. I know this is probably better suited to a hash
> but I am very hash illiterate. I can perform basic functions in
> hashes and do simple stuff but I don't play around with perl enough to
> have gotten any better.
Here is one way:
#!/usr/bin/perl
use strict;
use warnings;
my @keys = qw( l format country zip category ua id );
my @data;
while( my $line = <DATA> ) {
chomp($line);
my @fields = split(/&/,$line);
my %record = map { $_, ''} @keys;
for my $field ( @fields ) {
my( $key, $val ) = split(/=/,$field);
$key = 'country' if $key eq 'alt-country';
$record{$key} = $val;
}
push( @data, \%record );
}
for my $record ( @data ) {
print join(',',@{$record}{@keys}), "\n";
}
__DATA__
l=en&format=xhtml
format=xml&country=US&ua=Mozilla
l=sp&zip=00000&category=books
l=en&format=xml&id=xyz
l=fr&country=US&alt-country=CA
__END__
which produces:
en,xhtml,,,,,
,xml,US,,,Mozilla,
sp,,,00000,books,,
en,xml,,,,,xyz
fr,,CA,,,,
--
Jim Gibson
------------------------------
Date: Fri, 3 Apr 2009 11:25:14 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: Re: URI queries with varied amounts of named values
Message-Id: <98c1f4ae-2135-46f9-9335-372f94189a29@e38g2000yqa.googlegroups.com>
CODE:
while (<DATA>)
{
chomp;
my $string = $_;
$string =~ s/&/","/g;
$string =~ s/=/","/g;
$string = qq("$string"\n);
print $string;
}
__DATA__
l=en&format=xhtml
format=xml&country=US&ua=Mozilla
l=sp&zip=00000&category=books
l=en&format=xml&id=xyz
l=fr&country=US&alt-country=CA
OUTPUT:
C:\PerlLearn>perl uri_hash.plx
"l","en","format","xhtml"
"format","xml","country","US","ua","Mozilla"
"l","sp","zip","00000","category","books"
"l","en","format","xml","id","xyz"
"l","fr","country","US","alt-country","CA "
C:\PerlLearn>
------------------------------
Date: Fri, 3 Apr 2009 11:25:20 -0700 (PDT)
From: rick <devrick88@gmail.com>
Subject: Re: URI queries with varied amounts of named values
Message-Id: <d83b02ac-0107-4f6b-9c06-b658ae2a312d@m36g2000vbp.googlegroups.com>
On Apr 3, 1:00=A0pm, Jim Gibson <jimsgib...@gmail.com> wrote:
> Here is one way:
>
> #!/usr/bin/perl
> use strict;
> use warnings;
>
> my @keys =3D qw( l format country zip category ua id );
> my @data;
> while( my $line =3D <DATA> ) {
> =A0 chomp($line);
> =A0 my @fields =3D split(/&/,$line);
> =A0 my %record =3D map { $_, ''} @keys;
> =A0 for my $field ( @fields ) {
> =A0 =A0 my( $key, $val ) =3D split(/=3D/,$field);
> =A0 =A0 $key =3D 'country' if $key eq 'alt-country';
> =A0 =A0 $record{$key} =3D $val;
> =A0 }
> =A0 push( @data, \%record );
>
> }
>
> for my $record ( @data ) {
> =A0 print join(',',@{$record}{@keys}), "\n";
>
> }
>
> __DATA__
> l=3Den&format=3Dxhtml
> format=3Dxml&country=3DUS&ua=3DMozilla
> l=3Dsp&zip=3D00000&category=3Dbooks
> l=3Den&format=3Dxml&id=3Dxyz
> l=3Dfr&country=3DUS&alt-country=3DCA
> __END__
>
> which produces:
>
> en,xhtml,,,,,
> ,xml,US,,,Mozilla,
> sp,,,00000,books,,
> en,xml,,,,,xyz
> fr,,CA,,,,
>
> --
> Jim Gibson
Holy cow Jim, that is spot on. Thank you so much, you have saved me
hours of fumbling around and what was certain to be one of the ugliest
perl scripts ever created.
------------------------------
Date: Fri, 3 Apr 2009 10:40:26 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: Re: XRC vs Perl (GUI) generated code
Message-Id: <f3e0edbd-b73b-42af-a843-401ac0d796d0@w9g2000yqa.googlegroups.com>
On Apr 3, 4:06=A0am, king kikapu <aboudou...@panafonet.gr> wrote:> I do
not want an opinion if "Perl is good at this but bad at that", if
> "GUIs are better in .net than Perl" etc etc...
> I have a 9 years experience in .NET and C# and i just want to master a
> cross-platform language like Perl.
Do you want to know whether a hammer is good at installing screws, or
bolts? Or if a screwdriver is good at installing nails or bolts? Perl
(IMO) is a rifle, good at a small slice of tasks ... witness its name,
the Practical Extraction & Reporting Language. If you want to do data
extraction, manipulation, reformatting, and reporting, Perl is a good
choice. It might be a poor choice for other kinds of jobs.
> My question is, really, very specific:
> "Can i, easily, use XRC code that is generated from GUI Builder tools
> or is it better to use Perl generated code from wxGlade ?
> What is the positives/negatives of using XRC code from my Perl
> script ?"
I don't know. I don't build GUI apps with Perl, and I don't know
anyone who does. My guess would be that anyone who does so might be a
masochist. If I wanted to build a GUI app, I'd either use Java
or .NET.
You didn't ask this, but FWIW, my feeling is that GUI apps in general
are a dying breed. Where I work, a large state university, all the
apps we've gotten in the last four years have been web apps, with the
sole exception of the database applications we use. I work in IT, and
pushing apps to clients, several thousand in our case, is for the
birds or the insane. Much easier to put an app on a server and let the
client connect to it with a browser. It's not up to me to judge your
intention in building a GUI app, and if you have a killer app that
will make you millions, I sincerely wish you all the best. But my take
as one who likes to stay in touch with what is going on in various
communities (Perl included) is that using Perl for building GUI apps
doesn't constitute a big sector of Perl programming and is becoming a
smaller sector of other programming technologies.
I may be wrong, and if so I'll be told that I'm wrong, but I'd be
willing to bet that I'm not. In any case, I don't want to insult you
or discourage you. I'm just offering my opinion without making any
kind of judgment on your efforts.
CC
------------------------------
Date: Fri, 3 Apr 2009 10:48:59 -0700 (PDT)
From: ccc31807 <cartercc@gmail.com>
Subject: Re: XRC vs Perl (GUI) generated code
Message-Id: <79e1a958-497c-482b-b0c2-0d5f04f6c262@o6g2000yql.googlegroups.com>
On Apr 3, 5:20=A0am, king kikapu <aboudou...@panafonet.gr> wrote:
> Alas, we all use graphical environments these days...
We do? This is news to me. About 95% of the scripts I write run on the
CLI, and many of them run as cron jobs or as scheduled tasks. The
usual formulation is that GUIs constitute 80% of the complexity of an
application but only 20% of the functionality.
As a database guy, I churn out scripts that produce a variety of
output files (CSV, PDF, XLS, RTF, XML, TXT, etc.) from a variety of
input files, all done on the CLI, and my customers think I walk on
water. Thanks to Perl.
CC
------------------------------
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 V11 Issue 2317
***************************************
