For this reason, when I use any "use <>" command (eg. use
Time::localtime) the module is not found.
Can anybody tell me the site where I can download the essential
perl library modules.
I appreciate all help.
Regards,
Michael
Did a command-line utility called "cpan" (or "cpan.exe"?) come
with your perl.exe file?
--
Steven O'Neill ste...@panix.com
Brooklyn, NY http://www.panix.com/~steveo
The Time::localtime is part of core Perl. If you do not have it then
you do not have a proper installation of Perl. Given the fact that
you refer to the executable as perl.exe I am guessing you are using
some form of MS Windows. You can download an installer for Windows
from ActiveState:
http://downloads.activestate.com/ActivePerl/Windows/5.8/ActivePerl-5.8.8.820-MSWin32-x64-274739.msi
Whoops, that is the 64-bit version. This the normal version:
http://downloads.activestate.com/ActivePerl/Windows/5.8/ActivePerl-5.8.8.820-MSWin32-x86-274739.msi
yes, and it costs ONE HUNDRED MILLION BILLION DOLLARS.
On Mar 7, 2007, at 1:43 AM, Jm lists wrote:
>>
>> Whoops, that is the 64-bit version. This the normal version:
>> http://downloads.activestate.com/ActivePerl/Windows/5.8/
>> ActivePerl-5.8.8.820-MSWin32-x86-274739.msi
>>
>
> Do I need to pay for it?
>
> --
> To unsubscribe, e-mail: beginners-...@perl.org
> For additional commands, e-mail: beginne...@perl.org
> http://learn.perl.org/
>
>
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.3 (Darwin)
iD8DBQFF7ozKuT/QpFTX5YIRAtSjAJsGBmSB7ZFbhGGaogb0W4q/z7I1qwCfQ1UR
GJ+Ig5Etmm0aWzznzuq8Nio=
=eF+a
-----END PGP SIGNATURE-----
Do I need to pay for it?
Only if you want support from them or some of their third-party tools.
Support is really only necessary if you are planning to deploy the
code on a production machine, and even then over half the places I
have worked did not purchase support for Perl. As for their
third-party tools, I only find Komodo IDE 4.0 to be worth the cost
(and even then only to your employer). I really like Komodo Edit 4.0
(the free version that doesn't have debugging). It even has a vi
emulation mode.
I am trying to edit a file using html and perl. I got it working but I
wanted to know if this i the best way to do the job. I have a problem with
the first line being blank. Everytime I submit I get a new blank line at
the top of my file:
(some HTML removed....)
#!/usr/bin/perl
$|=1; # no buffering, ??
$allow_html_code = 1;
$ExceptionSiteList = '/etc/dansguardian/famlists/exceptionsitelist';
# URL to this CGI
$myurl = "/access/banned.pl" ;
&ReadEnvs;
my $urllist = $in{'input3'};
if ($urllist ne "") {
open (EFILE, ">$ExceptionSiteList") or die "Can't open $file: $!\n";
print EFILE "$urllist";
close EFILE;
}
print <<EOE ;
.
.
.
<FORM ACTION="$myurl" METHOD="POST"><textarea rows="40" name="input3"
cols="50">
EOE
open (FILE, "<$ExceptionSiteList") or die "Can't open $file: $!\n";
while (<FILE>) {
chomp;
print "$_";
}
close FILE;
print qq(</textarea><input type="submit" value="Submit"
name="B5"> <input
type="reset" value="Undo" name="B6"></form></td></tr>);
print "</table></body></html>";
sub ReadEnvs {
local($cl, @clp, $pair, $name, $value);
if ( $ENV{'REQUEST_METHOD'} eq 'POST' ) {
read(STDIN, $cl, $ENV{'CONTENT_LENGTH'} );
}
else {
$cl = $ENV{'QUERY_STRING'};
}
@clp = split(/&/, $cl);
foreach $pair (@clp) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/<!--(.|\n)*-->//g;
if ($allow_html_code != 1) {
$value =~ s/<([^>]|\n)*>//g;
}
$in{$name} = $value;
}
}
Ryan
For reference, you have many modules (in the core), but not some that you
want.
> For this reason, when I use any "use <>" command (eg. use
> Time::localtime) the module is not found.
Try :
use strict;
use Exporter;
use Carp;
Don't you have those? If not, you have a broken perl.
Assuming you have the ActiveState Perl for Windows, check its
documentation for the PPM3 command (or PPM4 if that's what you have).
--
Peter Scott
http://www.perlmedic.com/
http://www.perldebugged.com/