Are you trying to download and save the file or display it?
If you are trying to display it make sure you have the proper Content-type: image/gif
header before any other output.
If you are trying to download it then try Net:FTP, much sexier for file tranfers.
Dan
>
>
> I'm t
>
> R. Joseph Newton wrote:
> > Mark VanMiddlesworth wrote:
> >> What's wrong with the syntax, especially line 12?
>
> >> if ($arg = "-n") {$e = 0} # Line 12
Sorry if I'm misunderstanding what your're tryin gto do but to me it seems :
$arg = $ARGV[0]; # or whatever/however
This works to get your average file ::
use LWP::Simple;
my $content = get($url);
print $content;
is there a way to give a user name and password if $url is .htaccess protected?
Something like ::
use LWP::Simple;
my $content = authenticate_and_get($url, $user, $pass);
print $content;
IE if y
through?
Thanks
Dan
I guess my main question would boil down to ::
How can I use variables that get declared in a lib file in a script that uses -w and
use strict; ?
A more complex example of what I've tried and what I'm trying to get is here ::
On the script below, when use strict is commented out ::
Name "main::
>
> --- Dan Muey <[EMAIL PROTECTED]> wrote:
> > #!/usr/bin/perl -w
> > use strict;
> > #my $dog = 'bart';
> > eval {
> > use lib '/home/dmuey';
> > require "lib.lib";
> > };
> > print &quo
Right on thanks!
>
> > > --- Dan Muey <[EMAIL PROTECTED]> wrote:
> > > > #!/usr/bin/perl -w
> > > > use strict;
> > > > #my $dog = 'bart';
> > > > eval {
> > > > use lib '/home/dmu
eed to grab out of that example
> is the domain only, ( mama.com ) just the part that one would
> register with a registrar, not any subdomains or any of that
> just whatever.com.
>
> Any ideas?
> Can it be done with cgi or uri or some other module instead
> of doing some rege
ner version?
I know there's a way but it's Monday :(
Thanks
Dan
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
>
> --- Dan Muey <[EMAIL PROTECTED]> wrote:
> > IS there a better way to perhaps assign the value of $1
> back to $var
> > all in one statement? EG
> >
> > $var = 'hello.domain.com';
> > # Instead of this ::
> > $var =~ m/
Thanks!
>
> Dan Muey wrote:
> >
> > IS there a better way to perhaps assign the value of $1
> back to $var
> > all in one statement?
>
> Yes.
>
> > EG
> >
> > $var = 'hello.domain.com';
> > # Instead of this ::
>
>
> Dan Muey wrote:
>
> > I guess my main question would boil down to ::
> >
> > How can I use variables that get declared in a lib file in a script
> > that uses -w and use strict; ?
> >
> > A more complex example of what I've tried and wh
> --- Dan Muey <[EMAIL PROTECTED]> wrote:
> > $domain =~ m/((\w+)\.(\w+)$)/;
> > And $1 did indeed only have 'domain.com'
> > Then I realized, what about tld's like com.uk like yahoo.com.ru
> > google.com.uk
>
> Try
>
>
Does anyone know of a good resource that compares MySQL for windows to
the other popular engines?
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]] On Behalf Of
Chris Jones
Sent: Monday, February 17, 2003 11:57 AM
To: Pradeep Goel; [EMAIL PROTECTED]
Cc: [EMAIL PROTECTE
f I bought it straight from a
store. So maybe I should say $47,000 :) )
You also find great support for mysql and perl's DBI module has served me well withh
mysql and perl.
> -Original Message-
> From: Dan Morrison [mailto:[EMAIL PROTECTED]]
> Sent: Monday, February 17, 20
> > > > $domain =~ m/((\w+)\.(\w+)$)/;
> > > my($dom) = $URI =~ m{://([^/:]+)};
> > What I was trying to get was just the domain without any
> subdomains,
> > ie what you would register with a registrar
>
> Ah. Sorry, I misunderstood.
> Nothing comes to mind off the top of my head.
Oh well,
So seems the concensus. I will be trying to adapt a module type system for it.
Thanks
Dan
> Dan Muey wrote:
>
> >
> > To share configuration variables in one place for lots and lots of
> > scripts to use instead of having to put them in each script
> and then
&g
Thanks! I 'll give her a go that route.
I like the idea just need time to do it then polish it up.
Thanks
Dan
>
> > Well, any other ideas on how I can have a hundred scripts
> all use the
> > same settings and make it easy to change any of them at
> will withou
Don't use snedmail use one of the many Mail modules that doesn't rely on external
programs.
http://search.cpan.org
> -Original Message-
> From: Rob Richardson [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, February 18, 2003 6:13 PM
> To: [EMAIL PROTECTED]
> Subject: Where to I get sendma
Try LWP::Simple
use LWP::Simple;
$content = get("http://yahoo.com";);
print "Content-type: text/html\n\n";
print $content;
Or use HTML::Parser or HTML::TokeParser
To get only specific thing from $content.
Very smooth once you do it a bit.
> -Original Message--
ning it into a pdf
They seemed more toward building one from pieces, which is cool, but harder than
translating a whole file at once.
I could be wrong and if I am I look forward to
Someone showing me the light.
Dan
> -Original Message-
> From: Johnson, Shaunn [mailto:[EMAIL PR
use LWP::Simple;
use Net::FTP;
http://search.cpan.org
Very nice tools!
> -Original Message-
> From: Mike Blezien [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, February 19, 2003 8:47 AM
> To: [EMAIL PROTECTED]
> Subject: sending files from one server to another.
>
>
> Hello all,
>
> b
";
There are tests you can do. I'd say go to serach.cpan.org and search for Benchmark.
I think you'll find lots of great tools
Dan
> the script ? basically i want to compare the executable speed
> of the program with and without using the module. thanks, KM
>
>
use File::Slurp;
@files = read_dir("/home/joemama/public_html/files");
# may be readdir see http://search.cpan.org for details
foreach $f(@files) {
print "http://www.domain.com/files/$f\";> $f \n";
}
>
>
> Does anyone know where I can get a script that looks into the
> contents o
&(-d $dest_dir)) {
print `cp -R $orig_dir $dest_dir`;
}
else { print "One of your directories is a bad monkey! \n"; }
2) more secure and portable
try the File::Slurp ( I'm sure there's other more suited to your particular
task )
module or other
Try this ::
$| = 1;
open(STDERR, ">&STDOUT");
print `cp ...`;
Dan
>
>
> I want to get the error message from a system call as a text
> string and not a numeric code. The error I see on the screen is:
>
> cp: cannot create /tm
Depends on the shell.
If you don't want to use perl for this, ( I have no idea why you wouldn't ;p )
You'll need to see your specific shell's info. Otherwise I'm sure there are plenty of
Us ready to assist in helping you learn how to do what you say via perl.
>
>
> Hi,
> I am sorry for put
Any changes to sendmail?
When pipingto an external prog you now have to deal with what's going on in that prog
and perhaps an error it is sending out is making perl say ' no recipients' when there
is.
I'd say use a module that doesn't realy on external prog. Bet that'll fix it.
http://search.
ms/syntax ???
my @body = $mail->body(); # or does my @body = $mail->tidy_body(); return the same
thing just tidied up ?
my %header_info = $mail->head(); # used likek thus - $header_info{'To'}; ,
$header_info{'Subject'};
Thanks
Dan
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Sweet!! Thanks a million!!!
Any ideas how to get the text/plain section of the message into an array or scalar?
> -Original Message-
> From: Casey West [mailto:[EMAIL PROTECTED]]
> Sent: Friday, February 21, 2003 11:13 AM
> To: Dan Muey
> Cc: [EMAIL PROTECTED]
> Su
Thanks I'll look into parsing out the message from the header boundary bit.
All I'm trying to do is get some of the header fields and do different things based on
them. And store the body alone somewhere.
Here's what I have and it works perfecto but one question...
---
use Mail::I
>
> It was Friday, February 21, 2003 when Dan Muey took the soap
> box, saying:
> : Hello list,
> :
> : What is the best way to get the headers of an email into a
> hash and also the text part of the body into an array or variable?
>
> Mail::Internet->new() ac
If you are piping then try this :
@piped_in = <>;
foreach $line(@piped_in) {...
> -Original Message-
> From: Bryan Harris [mailto:[EMAIL PROTECTED]
> Sent: Friday, February 21, 2003 2:42 PM
> To: [EMAIL PROTECTED]
> Subject: reading from a pipe
>
>
>
> I'm writing a simple script (qs
Excellent! Thanks
Dan
> -Original Message-
> From: Casey West [mailto:[EMAIL PROTECTED]
> Sent: Friday, February 21, 2003 2:50 PM
> To: Dan Muey
> Cc: Casey West; [EMAIL PROTECTED]
> Subject: Re: parsing email from STDIN
>
>
> It was Friday, February 21,
undary
}
Is there an easier/faster/modular way to do this, I'm lookinf at the MIME::Parse
(SP??) on cpan but not sure which direction to travel.
I guess what I'm looking for is something like this ::
@text_only = $mail->get_mime_part('text/plain',@body);
Thanks
Dan
le::Slurp
If you're trying to write a file on a remote server try
Net::FTP
Or
SOAP::Lite
See http://search.cpan.org for those modules.
Dan
> -Original Message-
> From: dan [mailto:[EMAIL PROTECTED]
> Sent: Friday, February 21, 2003 5:16 PM
> To: [EMAIL PROTECTED]
>
scripts, it outputs the correct data,
> but my goal is to be able to get the "download file" window
> up, and be able to store a "servers.ini" file from the data
> the perl script outputs.
>
> Dan
>
> "Dan Muey" <[EMAIL PROTECTED]> wrote
Try CGI::Cookie
Dan
> -Original Message-
> From: Nigel Peck - MIS Web Design [mailto:[EMAIL PROTECTED]
> Sent: Thursday, February 27, 2003 6:18 AM
> To: CGI List; [EMAIL PROTECTED]
> Subject: Cookies, CGI
>
>
> I'm trying to set a cookie and have it ret
s run eval {}; on it to make sure all is well
and get it into your prog.
Dan
> -Original Message-
> From: Yannick Warnier [mailto:[EMAIL PROTECTED]
> Sent: Thursday, February 27, 2003 8:19 AM
> To: [EMAIL PROTECTED]
> Subject: Re: Searching a module to share a file
>
>
t and Mail::Header to parse the email out and do what you will with it.
In unix I'd use cron to run that script every so often and I'm sure winders has a
similar thing.
Dan
>
> I want to write a script that takes its parameters from an
> email. Now here is the tricky par
> > Greetings!
> Hello
> >
> > I'm trying to do some Perl for a non-profit organization. The
> > computer administrator doesn't know very much about Perl or
> about the
> > server. If I were to ask him what Perl modules were available, he'd
> > probably just have to call somebody else and get
Check out the CGI module at search.cpan.org.
There's an example about how to use the header() function to bring up a dialogue
box to download the generated content as a file. In the example it's using a gif
But the principles will apply to your file as well. Give that a read and a t
I have a need to grab specific Mime sections of an array.
I've looked at and tried different Mime Modules but can't seem to get it to go.
I thought about parsing it manually but I'm not sure if every message will be
formatted exactly the same, hence the module.
The array contains the lines of a
= $info->(width);
> # pixel width
> $h = $info->(height);
> # pixel height
> $color = $info->(color_type) # color type
Your errors are talking about unquoted width and height
Try quoting
> > I'm trying to set a cookie and have it returned to the
> script before
> > the user has to visit another page.
> >
> > I'm currently doing it like this:
> >
> > Original Cookie already set
> > User request -> Script returns Set-cookie and Refresh to
> second script
> > Second script called
> hi all,
>
> I've problem with executing an external program in my perl
> program. I'm trying to build an server for managing pop3
> accounts to which I can connect for example via php sockets.
>
> For server/client enviroment I'm using Net::Server perl
> module. Everything works all right, u
http://search.cpan.org
Look at the File modules.
Not sure about an exact command named xcopy but I'm
sure there the same functionality somewhere.
Dan Muey
> -Original Message-
> From: Scott Ellis [mailto:[EMAIL PROTECTED]
> Sent: Thursday, February 27, 2003 3:15 P
I assume what you're trying to do is have in your html
And maybe except paramkaters and display accordingly?
If so all you need to remember is to print the proper headers and don't try to print
and text.
#!/usr/bin/perl
use File::Slurp;
use CGI qw/:standard/;
print header("image/gif");
prin
>
> Steve Few wrote:
> > Hi guys,
> >
> > I tried to send this little test script, but my error at my
> NT command
> > line was,
> >
> > "cant' locate Mail::Sendmail.pm in @inc (@inc contains d:/perl/lib
> > D:/perl/site/lib at sendmail.pl at line 3".
Maybe I'm missing a previous thread but
And , if I am, where to go next ::
I have 3 questions in the code below, any input would be most appreciated
Thanks
Dan
use MIME::Parser;
my $parser = new MIME::Parser;
$parser->output_to_core(1); # 1) do I need this set to true to be able to get the
result into a variable ??
# 2) thes
>
> I don't know much about the problem you are asking for.
> But it seems to me that you're wrong when calling the
> subroutine wanted.
>
> # File::Find wanted function
> sub wanted;
>
It's actauilly not clling the routine it's declaring it. So it is valid perl but it's
not actually callin
>
> Hi,
>
> I am try to automate a analysis process, In which I used a
> windows box to telnet a UNIX box and do the job on the telnet
> consol. I need to use move the cursor down or up and also
Are you trying to get coordinants then enter those keys?
A little more info would help On exact
Hello,
>
> How do I convert pdf file (Acrobat readable format) to text,
Convert to text not sure..
Have you looked at http://search.cpan.org and searched for pdf under modules?
Using/getting pdf into your script is easy :
#!/usr/bin/perl
use File::Slurp;
use CGI qw/:standard/;
print header(
Remember to reply to the list!!
>
> Thanks, Dan!
>
> No, I only need to choose from the manu, sometimes, I
> have to move the cursor to a specific manu choice and
> type a few words.
Depends on the program that has the menu's
Do they have shortcut keys?
Not sure ex
>
> Hello,
>
> Is there any existing module that can list all the
> subdirectories/files within a given directory?
Is this homework? You'll never learn anythign if you cheat!
Any who I'll bite even though I think it's howework ::
http://search.cpan.org is your friend
use File::Slurp;
@fi
There was a post about this exact thing a few weeks or so ago. I can't remember who
posted it but
Here is what I use, works like a monkey in heat!
#!/usr/bin/perl
$commify_this_number = $ARGV[0];
$commify_this_number =~ s/(^[-+]?\d+?(?=(?>(?:\d{3})+)(?!\d))|\G\d{3}(?=\d))/$1,/g;
print $commify_th
perldoc -f split
Will fic you up!
Dmuey
> Hi Guys,
>
> I have an array in which each element is a line commandline
> data. It looks something like this -
>
> @Array contains lines:
>
> post1: -r [EMAIL PROTECTED] -x cat-100 -h post1
> post2: -x tel -h post2
> post3: -h post3 -x hifi
>
> An
lues ( I guess I should be calling them
arguments oh well )
foreach $switch(keys %tmp) {
$results{$cnt}{$switch} = $value;
}
$cnt++
}
print $results{'1'}{'-h'}; # would print post1 from your three line example below
Give that a go and see if i
> Hi Folks,
>
> The code at http://longren.no-ip.org/tyler/blowfish.pl
> encrypts some $data. Once the data is encrypted, the hex
> value should be stored in $ciphertext. $plaintext should have
> the original data that's in $data.
>
> When I run this code, I recieve this error:
At the risk of
>
> At 04:01 PM 3/1/2003 +, Anadi Taylor wrote:
> >Hi all,
> >
> >I have written a script that reads in information from a database:
> >name,
> >email, password and username.
>
>
>
> >Also: the only reason I am having to pull all this data from
> the mySql
> >database is because for some
> Dan Muey wrote:
>
> > I have a need to grab specific Mime sections of an array.
> >
> > I've looked at and tried different Mime Modules but can't
> seem to get
> > it to go. I thought about parsing it manually but I'm not sure if
> > e
HEllo list four quick questions ::
# 1) is there a CGI way to grab the scheme fo a url ??
with uri you can do $scheme = $uril->schem($url); but I may need a way to do it
with CGI without doing a regex or split at the ':'
$self_url = self_url();
# 2) which way is faster the CGI way or the
> Hello all,
>
> I have a script that I have been working on with perl builder
> and win2000. I have it working correctly at this point on the
> win 2000 machine. Although, I am not finished, I wanted to do
> a test on the server at this point to make sure everything is
> working correctly...
> Hello everyone.
Howdy
>
> I'm trying to write a script for Uploading pictures.
>
> Can you give me some advice??
> What module to look at first??
use CGI;
See the documentation at cpan.
Things I've found are ::
- upload the file before any headers are printed
- don't forget to make your
> I am trying to convert a pdf (and for that matter a
> postscript) type file to plain text. Response to my earlier
> mail suggested using File:Slurp, specifically;
>
> #!/usr/bin/perl
>
> use File::Slurp;
> use CGI qw/:standard/;
>
> $pdf_guts = read_file("/path/to/my.pdf");
Yes $pdf_guts
>
> I don't know of any Perl solution off the top of my head
> (check out CPAN), I instead use xPDF which includes a command
> line utility pdftotext.
>
> http://www.foolabs.com/xpdf/about.html
Exactly what you need!!
Now all you have to do is figure out what command line command you'd
use to
No no no, don't do it by hand. There's to many things to keep track of,
use the CGI module it handles all the messy details for you and do it better
than anything you can write ( no offense ;p ) ::
use CGI qw/:standard/;;
$var = param('var');
$monkey = param('monkey');
print header();
print "You
Uh.. What's the problem?
Are you getting an error of some kind?
Are you having problems querying a database?
A little context/code you're using might help.
There is no conflict with having slashes in a string that is stored in a variable so
You may want to expound a little more.
DMuey
> Hello,
If you can call a subroutine without parenthesis is that faster than with them or does
it not matter?
Example
$time = localtime;
or
$time = localtime();
is there a difference speedwise/peformace wise/portability wise or any wise at all?
Cool thanks. I figured that I just wanted to see if someone
Wiser could verify I'm not nuts.
So no pars means a two character shorter script then,
that's a little something ;p
DMuey
> Hi Dan.
>
> Dan Muey wrote:
> > If you can call a subroutine without parenthes
There was a post about pdf to html or txt yesterday.
You might see search.cpan.org to see about modules.
One solution was to use perl to execute an external
prog that would actually translate. Using perl you
could creat a new html file for each pdf file in no
time! You'd just need a module or
> Dan Muey wrote:
> > Cool thanks. I figured that I just wanted to see if someone Wiser
> > could verify I'm not nuts.
>
> Now that's not quite what I said. Go see your therapist ;-)
This list is my therapist!!!
>
> > So no pars means a two character
> hi all, its me again !!!
>
> this time I am having trouble with a cookie: i have written a
> script that
> sets a cookie:
>
> use CGI qw/:standard/;
> use CGI::Cookie;
>
> ## create cookie
> my $cookie = new
> CGI::Cookie(-name=>'ptsb
>
> sorry to bug ya about this - 1st it was a scope problem - but
> something you
> said here intregues me:
>
> >Two ways to test
> >1) have your script print the value of $membusrname
> >2) look in your cookies and see if it's there
>
> How do I look @ my cookies ??
I use Netscape 7. I
Not sure about the fulehandle problem but you may want to look at Net::FTP
For transfering file samongst servers. Quite easy to use and fast and all of that.
DMuey
> -Original Message-
> From: Smith Jeff D [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, March 04, 2003 1:53 PM
> To: '[EMAIL P
>
> Long ago in GW Basic there were sequential files and random
> access files. Does perl have the latter? I only to get (and
> then put) certain info in a certain place every time. If I
> can avoid writing the whole file every time I bet my web site
Every time what??
I'm not familiar with
From: R. Joseph Newton [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, March 04, 2003 3:09 PM
> To: Luinrandir Hernsen
> Cc: Dan Muey; [EMAIL PROTECTED]
> Subject: Re: please please comfirm (was Parsing variables)
>
>
> Luinrandir Hernsen wrote:
>
> > Thank you for your
Well it depends. Is this script on windows or unix?
I'm thinking unix due to the program name.
Can you do the same thing via the command line?
User~ # echo "\cN\cN\c]]Bc]]Bc]]B\cN\cNc]]B\cN\cZ" | lrp
If not then piping that to them won't work either.
Also if that does work you may save your self
> .--[ Dan Muey wrote (2003/03/04 at 15:04:30) ]--
> |
> | > Long ago in GW Basic there were sequential files and random
> | > access files. Does perl have the latter? I only to get (and
> | > then put) certain info in a certain place every time. If I
&
perldoc -f seek
Probably open() and seek() And all their friends will be your pal then.
DMuey
> the file is 250 variables. each variable is 225 charecters
> long. I only need to look at a 5x5 square of information (25
> charecters, 5 charecters on 5 sequential lines. I am making a
> map file
I get it in IE 5.0 ok also Netscape 7.01
> -Original Message-
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
> Sent: Wednesday, March 05, 2003 7:33 AM
> To: Nigel Peck - MIS Web Design; Dan Muey; [EMAIL PROTECTED]
> Subject: RE: Delivering Gra
s(!$_[1]);
Somehting like
$m = $_[1] unless(!$_[1]) :$m = 'text/plain';
But I can get it right, any assistance would be much appreciated.
Thanks
Dan
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
> > $m = 'text/plain';
> > $m = $_[1] unless(!$_[1]);
> >
> > Somehting like
> >
> > $m = $_[1] unless(!$_[1]) :$m = 'text/plain';
> >
> > But I can get it right, any assistance would be much appreciated.
> >
> >
of using || for an assignment. Sweet idea.
Thanks
Dan
>
> You can have as many conditions as you want, the first that
> is "true" (not blank, zero or undef) will be used.
>
> Rob
>
>
> -Original Message-
> From: Dan Muey [mailto:[EMAIL PROTECTED]
&g
12 Mar 5 11:10 sources
([EMAIL PROTECTED](~/perl_cpan_mod ):121)#
Or whatelse could I be fumbling up ??
Thanks
Dan
-- DETAILS --
([EMAIL PROTECTED](/home/dmuey):101)# perl -MCPAN -e shell;
cpan shell -- CPAN exploration and modules installation (v1.48)
ReadLine support available (try ``instal
Or for a really quick and dirty list ::
perl -e 'use ExtUtils::Installed;for (ExtUtils::Installed->new()->modules()){print "$_
\n";}'
DMuey
> -Original Message-
> From: John Mooney [mailto:[EMAIL PROTECTED]
> Sent: Wednesday, March 05, 2003 11:55 AM
> To: [EMAIL PROTECTED]; [EMAIL PROT
> I need to make an HTML page that lists all files and
> directories and then links to them. The following script,
> with a subroutine, looks like what I need. I should just
> need to add some html tags to the Print statements.
>
> Does that sound right to you all? Or do you have better
> sug
> im trying to use Spreadsheet::ParseExcel::Simple to return
> the name of the worksheet. but all i get is something such as:
> Spreadsheet::ParseExcel::Simple::_Sheet=HASH(0x39b8918)
>
> what am i doing wrong?
It's returning a reference to a hash it looks like.
I've never used that module so I
> Why doesn't my rename() work? It is returning a '1', meaning
> success (I get the "has been modified" message below. Yet
> when I list the files (ls), it shows the original file name
> and my tmp file name. The rename doesn't seem to work.
>
> Any ideas?!
Any of this apply??
perldoc -f r
> thanks, dan. while sometimes you can get away with not
> understanding something, in my case,hashes--sometimes you
> just have to face them head-on.
Amen to that
>
> thanks for your time in addressing my problem.
No problem I hope it helped, I may need help with that modu
.
> drwxr-xr-x 2 root wheel 512 Mar 5 11:11 build
> drwxr-xr-x 4 root wheel 512 Mar 5 11:10 sources
> ([EMAIL PROTECTED](~/perl_cpan_mod ):121)#
>
> Or whatelse could I be fumbling up ??
>
> Thanks
>
> Dan
>
> -- DETAILS --
>
> ([EMAIL PROTECTED
ot;;
} else {
print " $f \n";
}
}
print " \n";
> Thanks for your help! You saved me a lot of mis-programming.
> Yea, I'm really interested in the new challenges -- I just
> wish I already knew perl. It can do so much.
>
Try
# ./renamer.pl
How do you know it's not running?
It could be running but not printing anything to the screen?
Is it supposed to have output?
What is it supposed to do?
Throw us bone here!!
DMuey
> Hi,
>
> I am having problems opening this script on my machine. i
> have been getting
>
A noble task indeed!
I don't know of any links right off but here's a couple shorties :
- easier for other people to maintain even years from now
- easier to migrate and expand
- objects make it easier to interface and work with other things, consistantly and
without much effort
- decrease cost(
> > CPAN> install Bundel::CPAN
> ^^
>
> Hmm, that should be Bundle, shouldn't it ?!
Good point. I typed that part in then decided to show the output so I pasted that in.
Anither victum of hunt and peck!! ;p
>
>
> Cheerio,
> Janek
>
>
--
To unsubscribe, e-mail: [EMAIL PR
> --- Dan Muey <[EMAIL PROTECTED]> wrote:
> > A noble task indeed!
> > I don't know of any links right off but here's a couple shorties :
> > - easier for other people to maintain even years from now
> > - easier to migrate and expand
> > - object
>
> Clear DayI tired to run the script below on my host server
> and it would not run. The server cannot find Taintcheck or
> Timefuncs. I uploaded these pm file to the server. What did
You don't simply upload the pm files they have to be instsalled
On the server.
Perl -MCPAN -e shell
CPAN
> Hi all
>
> perl script below works, and does what I hoped it would, but
> I don't seem to understand how to get it to print out the
> result to a new file as opposed to stdout.
>
> Thanks for any help
>
> #!/usr/bin/perl -w
> use strict;
> use HTML::Parser;
>
> open(OUT, ">/share/file1")
That's what I thought too, that's why I asked where STDIN was coming from.
Always a bad idea to parse the input yourself because, as you found,
Different OS/perl versions/protocals/etc... May need different parseing
Methods.
But CGI is modular and platform independent and quite easy to use ::
P
> Hi
Howdy
>
> I have a perl script that takes images coming from a camera
> /home/httpd/htdocs/image.jpg and renames them the date and
> time of images to
> /home/me/images/2003_7_3_20_11_23.jpg.
>
> I would like to store file paths in the database of the
use Files::Slurp;
@files = read_d
401 - 500 of 1184 matches
Mail list logo