#!/usr/bin/perl
#print "Content-Type: text_html\n\n";
open (SALARY, "</cgi-bin/web_manage/salary");
chomp(@read = <SALARY>);
close (SALARY);
$read = join '',@read;
$read = $read + 10;
open (SALARY, "+</cgi-bin/web_manage/salary") || die "$!\n";
print SALARY $read;
close (SALARY);
I have another source in object-o...if you want it
contact woth me.
_________________________
Best regards.
Nafiseh Saberi
www.iraninfocenter.net
www.sorna.net
Remember that :
It is all in GOD's hands ,and
He will always be there for you.
____________________________
----- Original Message -----
From: "Jorge Goncalvez" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, November 29, 2001 14:25 PM
Subject: RE: a little help in autoincrement IP addresses
> I wanted to print this in a file:
>
> subnet $var1 netmask 255.255.255.0{range dynamic-bootp $var2 $var3;
> }
>
> $var1,$var2,$var3 are IP adress.
> I do it and It works but now I wanted to do this:
>
> In fact I wanted for exemple:$var2="192.40.54.n" and
$var3="192.40.54.n+10"
> How can I do this in Perl
>
> Thanks
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
