> -Original Message-
> From: Savinder Puri [mailto:[EMAIL PROTECTED]
> Sent: Thursday, February 12, 2004 7:12 PM
> Cc: [EMAIL PROTECTED];
[EMAIL PROTECTED]
> Subject: Perl GUI ??
>
>
> Hi All,
> I'm writing a series of Perl script (+ shell scripting etc) for creating
Builds. The scripts
> -Original Message-
> From: H. krishna [mailto:[EMAIL PROTECTED]
> Sent: Thursday, February 12, 2004 4:35 PM
> To: [EMAIL PROTECTED]
> Subject: java to perl
>
>
> Dear All,
>
> I have java program. I need to convert java to perl
> code. Any guidance is appreciated.
>
> Thanks in adva
> -Original Message-
> From: Daniel Bayerdorffer [mailto:[EMAIL PROTECTED]
> Sent: Thursday, February 27, 2003 4:08 AM
> To: [EMAIL PROTECTED]
> Subject: Newbie Quick and Dirty GUI
>
>
> Hello,
> I'm a brand spankin' newbie, so please forgive any foolish
> questions. I
> need to do s
> -Original Message-
> From: John Mason [mailto:[EMAIL PROTECTED]]
> Sent: Monday, February 03, 2003 7:19 AM
> To: [EMAIL PROTECTED]
> Subject: Messagebox icons
>
>
> Anyone know how to show different icons in a messageBox with
> the -icon
> parameter?
>
> I cant find anything in any
> -Original Message-
> From: TimeShadow [mailto:[EMAIL PROTECTED]]
> Sent: Monday, January 20, 2003 12:24 PM
> To: Perl List
> Subject: Create and mail files
>
>
> Hello Group,
>
> I have some questions on the types of modules I'll need to use to do the
following:
>
> Take input from
> -Original Message-
> From: Ricci, Mark [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, November 26, 2002 8:13 AM
> To: [EMAIL PROTECTED]
> Subject: Excel to html format
>
>
> Hello,
> I have an Excel spreadsheet that a person saves to a network drive
daily. I want to automate the
whoops, there i go again. mis-read the question. time for me to go home
now.
> -Original Message-
> From: Toby Stuart
> Sent: Thursday, November 07, 2002 5:33 PM
> To: 'Allegakoen, Justin Devanandan'
> Cc: '[EMAIL PROTECTED]'
> Subject: RE: Search
perl -ne "s/TOTAL/T.TOT/g; print" test.txt > test1.txt
it will pipe output into a new file called test1.txt.
granted not exactly what you wanted but *is* one line.
cheers
toby
> -Original Message-
> From: Allegakoen, Justin Devanandan
> [mailto:justin.devanandan.allegakoen@;intel.com]
thanks $Bill, i had to add binmode on $ifh and $ofh (see below) to make it
work
> -Original Message-
> From: $Bill Luebkert [mailto:dbe@;wgn.net]
> Sent: Wednesday, October 23, 2002 4:56 PM
> To: Toby Stuart
> Cc: '[EMAIL PROTECTED]'
> Subject: Re: FW: C
problem solved.
thanks
toby
> -Original Message-
> From: Toby Stuart [mailto:toby.stuart@;figtreesys.com.au]
> Sent: Wednesday, October 23, 2002 3:41 PM
> To: '[EMAIL PROTECTED]'
> Subject: FW: Crypt::CBC w/Crypt-DES (small correction)
>
>
> see corr
see corrections below
> -Original Message-
> From: Toby Stuart [mailto:toby.stuart@;figtreesys.com.au]
> Sent: Wednesday, October 23, 2002 3:35 PM
> To: '[EMAIL PROTECTED]'
> Subject: Crypt::CBC w/Crypt-DES
>
>
> Hi All,
>
> I'm trying to
Hi All,
I'm trying to encrypt/decrypt a text file using Crypt::CBC with DES.
The encryption works fine but the decryption seems to yield only the first
few bytes of the original text. I'm sure i'm missing something simple.
Any help appreciated.
Example follows:
use strict;
use Crypt::CBC;
m
Authentication when connecting to an
SMTP server?
Thanks,
--geoff
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]] On Behalf Of
Toby Stuart
Sent: Wednesday, 12 June 2002 03:30
To: '[EMAIL PROTECTED]'
Subject: FW: Send email in ActivePerl using SMTP
luxn.com is n
luxn.com is not running a mail service (well not on port 25 anyway)
change
$optServer = 'luxn.com';
to
$optServer = 'mail.luxn.com';
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Friday, June 07, 2002 7:00 AM
To: [EMAIL PROTECTED];
[EMAIL PR
how about a good old batch file.
-Original Message-
From: Sean Ahern [mailto:[EMAIL PROTECTED]]
Sent: Saturday, June 08, 2002 1:35 AM
To: [EMAIL PROTECTED]
Subject: Re: Starting other programs
At 10:11 07/06/2002 -0500, you wrote:
>I have a question about kicking off another program fro
Hi Steve,
This may not be the most eficient way, but it seems to work.
Someone will undoubtedly offer another (probably better) way to do it.
hth
Toby
my @numbers = qw(01 02 03 03 05 08 09 12 14 13 11 18 17 12 15 16 15 16 12 13
14 16 17 22 23 24 25 25 23 22 21 20);
my %counts;
&occur_in_arr
Hi Mike,
Have you tried running it with the Debug option set?
eg.
my $ftp = new Net::FTP('some.host', Debug => 1);
This should at least give you some idea as to why the connection is refused
etc..
hth
toby
-Original Message-
From: Mike Reilley [mailto:[EMAIL PROTECTED]]
Se
Hi Brad,
You could use the 'basename' function from the 'File::Basename' module.
#!perl.exe -w
use strict;
use File::Basename;
my $file_path = 'c:\some\path\to\a\file.txt';
my $file = basename($file_path);
print $file;
Or here is a rex that does much the same thing.
#!perl.exe -w
Found one, Config::IniFiles
Seems i am blind :)
-Original Message-
From: Toby Stuart [mailto:[EMAIL PROTECTED]]
Sent: Monday, April 15, 2002 3:56 PM
To: '[EMAIL PROTECTED]'
Subject: Module for parsing INI files
Hi All,
Anyone know of a module for parsing INI files?
I'v
Hi All,
Anyone know of a module for parsing INI files?
I've searched CPAN for things like: INI, Ini, Win32::TieIni, TieIni etc etc.
Nothing! Am i blind? I would've thought this to exist.
Something that loads the whole INI into a hash would be ideal. It has to
work with sections however.
If no
Why not use the Net::Ping module. Example follows:
#!perl.exe -w
use strict;
use Net::Ping;
my $host = 'blah';
my $timeout = 15;
my $p = new Net::Ping("icmp");
if ($p->ping($host,$timeout)) {
print "Host is contactable.\n";
}
else {
print "Host is NOT contactable.\n";
}
$p-
sounds like hack attempts. probably proxy chaining/switching.
-Original Message-
From: TimeShadow [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, March 05, 2002 3:03 PM
To: [EMAIL PROTECTED]
Subject: No referrer
I am having a problem with a user trying to access a formmail.pl script on a
Lin
here's
a little script which uses Tk::Table (amongst other things)
:-
#!perl.exe -w
use
strict;use Tk;use Tk::Table;use Net::Ping;
my
($mw,$table,$txtHost,$cmdPing,$txtStatus,$status);
$mw =
new MainWindow;
$table
= $mw->Table( -columns => '2', -rows =>
'4', -scrollbars => '0')-
Sounds
very similar to this (different modules but problem seems
same)...
ps. i
rec'd this a couple of weeks back
t0by
Trisha Adams wrote: Wed 30/01/2002 9:11 PM
> I am very new to perl, so please
excuse me if this is a 'newbie
> question.' I was recently trying
to make a bot for i
u can use M$ Word or Excel's object browser.
open Word
hit ALT + F11
goto tools and select References
select the typelib you require
open the object browser (view->Object Browser) or F2
... and select the class from the drop down (top left)
hth
t0by
-Original Message-
From: Richard
this
may help
http://examples.oreilly.com/cjkvinfo/perl/svpm99.pdf
-Original Message-From:
[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]Sent: Friday, February
08, 2002 3:46 PMTo: [EMAIL PROTECTED];
[EMAIL PROTECTED]Subject: Handling Japanese
characters with Perl
My apologies if
www.indigostar.com
> -Original Message-
> From: thiyag [SMTP:[EMAIL PROTECTED]]
> Sent: Wednesday, December 12, 2001 2:40 PM
> To: [EMAIL PROTECTED]
> Subject: want to make exe
>
> i have written perl scripts using perl/tk and perl wld someone suggest me
> how to make exeout of t
ref() is the beast u require.
Toby J Stuart
Senior Web Developer
Figtree Systems P/L
http://www.figtreesys.com.au
mailto:[EMAIL PROTECTED]
> -Original Message-
> From: Edward G. Orton [SMTP:[EMAIL PROTECTED]]
> Sent: Sunday, December 09, 2001 10:11 AM
> To: Perl-Win32-Users Maili
i think it's
use Tk;
^
see the little 'k'
> -Original Message-
> From: Gregg Martinson [SMTP:[EMAIL PROTECTED]]
> Sent: Thursday, May 10, 2001 4:41 AM
> To: [EMAIL PROTECTED]
> Subject: very basic TK ?
>
> Hello,
> I have been playing with TK today...readin
$number = "455368900";
print &str2ssn($number);
sub str2ssn
{
my $n = shift;
return undef if length($n) != 9; #assuming an SSN is always 9 chars
(less the dashes '-') ... i've no idea ... [t0by]
$n =~ m/^(\d{3})(\d{2})(\d{4})$/;
return $1 . "-" . $2 . "-" . $3
}
TP:[EMAIL PROTECTED]]
> Sent: 17/04/2001 12:54
> To: Toby Stuart
> Subject: RE: setting perl interpreter for asp, perl 5.6.x
>
> hi toby:
> i was running, for exampke, /eg/aspsamples/dumpvars.asp and got no
> variables listed. all the normal html stuff came over- just no
what's the error? any example code?
you do know that <%@ perlscript> really looks like <%@ LANGUAGE="PerlScript"
%> ... i guess you were abbreviating it.
t0by
> -Original Message-
> From: john z [SMTP:[EMAIL PROTECTED]]
> Sent: 17/04/2001 12:31
> To: [EMAIL PROTECTED]
> Subject:
incorrect!
chomp $word;
not
$word =~ chomp $word ;
> -Original Message-
> From: Bellenger, Bruno (Paris) [SMTP:[EMAIL PROTECTED]]
> Sent: 15/03/2001 12:29
> To: [EMAIL PROTECTED]
> Subject: RE: Beginner's problems
>
>
> To stay closer to your code, this works :
>
> open(IN,
33 matches
Mail list logo
