You should choose http://server/.../script.pl?key=value#ancor.
Do play with this: http://webcode.ru/cgi-bin/test/ancor/main.pl?value=test#5
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
> If I want to validate certain IP Address range
> say in an IP Address range of : "15.70.186.15-100",
> here where 15.70.186 is the network id and 15-100 is
> the host id. I want to discover all IP Addresses that
> fall in between 15.86.70.15 - 15.70.186.100 .
> what regexp do i need to use ?
Do
g literal of at most 4000 characters. Longer values
may only be entered using bind variables.
--
Andy Hassall <[EMAIL PROTECTED]> / Space: disk usage analysis tool
<http://www.andyh.co.uk> / <http://www.andyhsoftware.co.uk/space>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
index.html (or whatever else is
specified in the DirectoryIndex directive).
xoxo,
Andy
--
'Andy Lester[EMAIL PROTECTED]
Programmer/author petdance.com
Daddy parsley.org/quinn Jk'=~/.+/s;print((split//,$&)
[unpack'C*',&q
>Try to use(UpperCase):
> open(TEXT,"text.txt")
> while()
Also, if you're using Perl >= 5.6.0, use the $fh notation and get around
the barewords entirely.
open( my $fh, "text.txt" ) or die $!;
while ( <$fh> ) {
rp the entire file into one
variable, just tell Perl not to stop at the end of each line.
local $/ = undef;
open( TEXT, "text.txt" ) or die;
my $text = ;
close( TEXT );
print $text;
--
'Andy Lester[EMAIL PROTECTED]
Programmer/author petdance.com
Daddy parsley.o
I have written a short perl script to report disk usage on our various
systems at our site. What I would like to do is run the script from a page
on our intranet and get the feedback back. Now I can do this using rsh but
I am sure there is a way of doing it in perl. So any ideas please?
Andy
-
sub wanted1 {
return if (($_ eq ".") || ($_ eq ".."));
return unless -d $_;
$regfiles=0;
opendir(CURDIR,$File::Find::name);
while ($name = readdir(CURDIR)) {
if ( !( -d $name ) && !( -l $name ) ) { $regfiles += 1};
olve this? Did anything change if fork or exec in
5.6.1?
Thanks in advance,
Andy
Here's the 3 scripts:
parent.pl
-
#!/usr/bin/perl
use CGI_Lite;
my ($cgi, $data, @task);
$cgi = new CGI_Lite ();
$data= $cgi->parse_form_data ();
$task[0] = $$data{'job'};
$task[1
