-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Jenda
Krynicky
Sent: Thursday, 3 April 2008 08:55 AM
To: [EMAIL PROTECTED]; beginners@perl.org
Subject: Re: PerlScript - FileSystemObject - Windows Scrpting Host
From: oscar gil [EMAIL PROTECTED]
Hello
On Wed, 2008-04-02 at 17:19 +0200, Pau Marc Munoz Torres wrote:
Hi
is There some easy-understanding how to use ajax with perl tutorial
somewhere?
i just need to know how to do a cgi script to launch a prompt (javascript)
and use the answer in my script
I learnt AJAX from Mastering
This may work for you:
#!/usr/bin/perl
use warnings;
use strict;
use Fcntl ':seek';
@ARGV = 'somefile.csv';
$^I = '.back';
my @headers = map 1, split /,/, , -1;
my @keep = ( undef ) x @headers;
while ( ) {
chomp;
my @fields = split /,/, $_, -1;
for my
From: Rob Dixon [EMAIL PROTECTED]
Jenda Krynicky wrote:
From: inthepickle [EMAIL PROTECTED]
Really quick question. In Perl, if I open a file in notepad
system( notepad.exe $file ) ;
Perl stops processes and will not continue until I close notpad.
How can I open the file, and have
On Wed, 2008-04-02 at 10:19 -0700, inthepickle wrote:
Really quick question. In Perl, if I open a file in notepad
system( notepad.exe $file ) ;
Perl stops processes and will not continue until I close notpad.
How can I open the file, and have Perl continue running?
Look up start in the
Hi
I'm using Linux for some perl play.
Which method is considered better - using cpan as a command at the
command line or using 'perl -MCPAN -e ..'' ?
Does using CPAN by either method above ensure the latest version of
any given module or does it give the latest module for the particular
Hi,
I am trying to write a PERL script to retrieve a couple of podcasts
per week.
Using use XML::RSS::TimingBot I can retrieve and print the .rss file,
but how do I extract the actual mp3 URL from $response-content?
Thank you for you time.
Jim
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
e-letter wrote:
This may work for you:
#!/usr/bin/perl
use warnings;
use strict;
use Fcntl ':seek';
@ARGV = 'somefile.csv';
$^I = '.back';
my @headers = map 1, split /,/, , -1;
my @keep = ( undef ) x @headers;
while ( ) {
chomp;
my @fields = split /,/, $_, -1;
for my $i ( 0 ..
On Tue, Apr 1, 2008 at 5:40 PM, Chas. Owens [EMAIL PROTECTED] wrote:
2008/4/1 Jay Savage [EMAIL PROTECTED]:
snip
my ($last) = $number =~ /.*(\d)/;
Let Perl worry about what is and isn't a digit.
snip
Unfortunately, with the rise of UNICODE, \d is no longer what one
expects*
I'm just guessing here, but I'm going to suggest that both methods
ultimately call the same code and are therefore equivalent. Though the
cpan command takes arguments, so it might speed stuff up.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
2008/4/3 Jay Savage [EMAIL PROTECTED]:
snip
Exactly. The functionality is there to be taken advantage of. I don't
see why that is unfortunate at all. How is Mongolian digit three
less of a digit than arabic numeral three? That \d is unicode-aware
is, IMO, it's strongest selling point over
On Thu, Apr 3, 2008 at 7:35 AM, LesleyB [EMAIL PROTECTED] wrote:
snip
Which method is considered better - using cpan as a command at the
command line or using 'perl -MCPAN -e ..'' ?
snip
The cpan script was added in Perl 5.8.1. It is a command line
interface to the CPAN module, so it is not
From: Chas. Owens [EMAIL PROTECTED]
2008/4/3 Jay Savage [EMAIL PROTECTED]:
snip
Exactly. The functionality is there to be taken advantage of. I don't
see why that is unfortunate at all. How is Mongolian digit three
less of a digit than arabic numeral three? That \d is unicode-aware
ken Foskey schreef:
There is also a module cgi::ajax in CPAN that you might want to look
at.
I guess you mean CGI::Ajax.
--
Affijn, Ruud
Gewoon is een tijger.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
Need some assistance:
A script that writes (will usually appends) 8 records
(rows/lines/whatever) to a flat file
problem:
If there are NO records with the date (date format: 03-Apr-08)
of the incoming data I want to write/append these records to the file
If there are existing
On 4/3/08, Jim [EMAIL PROTECTED] wrote:
Hi,
I am trying to write a PERL script to retrieve a couple of podcasts
per week.
Using use XML::RSS::TimingBot I can retrieve and print the .rss file,
but how do I extract the actual mp3 URL from $response-content?
Using a suitable regular
On Thu, Apr 3, 2008 at 5:10 PM, Mark Wagner [EMAIL PROTECTED] wrote:
On 4/3/08, Jim [EMAIL PROTECTED] wrote:
Hi,
I am trying to write a PERL script to retrieve a couple of podcasts
per week.
Using use XML::RSS::TimingBot I can retrieve and print the .rss file,
but how do
Gerald Wheeler wrote:
Need some assistance:
A script that writes (will usually appends) 8 records
(rows/lines/whatever) to a flat file
problem:
If there are NO records with the date (date format: 03-Apr-08)
of the incoming data I want to write/append these records to the file
If
e-letter wrote:
Readers,
I have a csv file (greater than 256 columns hence unable to open in
spreadsheet) of the following format:
column header1, column header2, column header3
1,0.0e0,0.0e0,5e-6
2,0.0e0,0.0e0,6e-7
3,0.0e0,0.0e0,0.0e0
I want to perform: if column headerx contains
Hi,
With regards to the script below, inside the foreach loop, can someone explain
to me why the expression $_=~ s/\nfred\n/nancy/;
did not change the default variable $_ from fred (enclosed by \n) to nancy.
Thanks
# start of script ###
use strict;
open (MYDATA,
Chas. Owens wrote:
On 4/3/08, Jim [EMAIL PROTECTED] wrote:
how do I extract the actual mp3 URL from $response-content?
snip
my ($url) = $response-content =~ /http:\S+?\.mp3/;
and a regex is not necessarily the best way to parse HTML (consider
using HTML::Parser* or one if the other
[EMAIL PROTECTED] wrote:
Hi,
With regards to the script below, inside the foreach loop, can
someone explain to me why the expression $_=~ s/\nfred\n/nancy/;
did not change the default variable $_ from fred (enclosed by \n) to nancy.
Thanks
# start of script ###
[EMAIL PROTECTED] wrote:
With regards to the script below, inside the foreach loop, can
someone explain to me why the expression $_=~ s/\nfred\n/nancy/; did
not change the default variable $_ from fred (enclosed by \n) to
nancy.
Because there is no $_ variable with two newlines. @newdata
Rob Dixon [EMAIL PROTECTED] 4/3/2008 3:49 PM
Gerald Wheeler wrote:
Need some assistance:
A script that writes (will usually appends) 8 records
(rows/lines/whatever) to a flat file
problem:
If there are NO records with the date (date format: 03-Apr-08)
of the incoming data I want to
I know they are both the same, I just want to know why we have both.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
On Thu, Apr 3, 2008 at 7:29 PM, Ryan [EMAIL PROTECTED] wrote:
I know they are both the same, I just want to know why we have both.
snip
Because originally they meant different things. The for loop was a
c-style loop and the foreach loop was an iterator. Eventually it was
realized that the
Chas. Owens wrote:
On Thu, Apr 3, 2008 at 7:29 PM, Ryan [EMAIL PROTECTED] wrote:
I know they are both the same, I just want to know why we have both.
snip
Because originally they meant different things. The for loop was a
c-style loop and the foreach loop was an iterator. Eventually it
On Thu, Apr 3, 2008 at 8:19 PM, Rob Dixon [EMAIL PROTECTED] wrote:
Chas. Owens wrote:
On Thu, Apr 3, 2008 at 7:29 PM, Ryan [EMAIL PROTECTED] wrote:
I know they are both the same, I just want to know why we have both.
snip
Because originally they meant different things. The for
Gerald Wheeler wrote:
Rob Dixon [EMAIL PROTECTED] 4/3/2008 3:49 PM
Gerald Wheeler wrote:
Need some assistance:
A script that writes (will usually appends) 8 records
(rows/lines/whatever) to a flat file
problem:
If there are NO records with the date (date format: 03-Apr-08)
of the
Chas. Owens wrote:
On Thu, Apr 3, 2008 at 8:19 PM, Rob Dixon [EMAIL PROTECTED] wrote:
Chas. Owens wrote:
On Thu, Apr 3, 2008 at 7:29 PM, Ryan [EMAIL PROTECTED] wrote:
I know they are both the same, I just want to know why we have both.
snip
Because originally they meant different
hi there,
I have a pile of pdf documents which may or may not contain email adresses.
Now I do have to mask the [EMAIL PROTECTED] adresses into something like xyAT
whereever.dot
I looked at CAM::PDF and PDF::API2 -
my CAM::PDF code would look like
foreach my $file (@todo){
my
On Thu, Apr 3, 2008 at 8:37 PM, Rob Dixon [EMAIL PROTECTED] wrote:
snip
* Note, this is not real Huffman encoding, just Larry Wall's version of it.
Huffman encoding is a compression algorithm, used in GIF files if I
remember correctly. It's not relevant to human-readable text. If you're
Huffman encoding is basically the idea that the more often a symbol is
used, the shorter it should be.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
I'm only starting to use CPAN modules and already over my head.
I installed Bundle::Music::Tag and it seemed to go OK.
But when I try a variation on the module's example program:
#!/usr/bin/perl
use Music::Tag;
my $filename = tune.mp3;
my $info = Music::Tag-new($filename,
34 matches
Mail list logo