ari,
to replicate the below in perl:
<script>
#!/usr/bin/perl
my ($A, $B, $C, $D) = split(/\./, $LocalIP);
my $mask = "$A\.$B\.$C\.0/24";
print $mask;
</script>
regards,
-keith
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, May 01, 2002 12:00 PM
Subject: [e-smith-devinfo] more about {$LocalIP}
> In #!/bin/sh terms, what I'm trying to do is the following:
> (Assuming that {$LocalIP}=192.168.1.1 in the /etc/e-smith/configuration
file)
>
> A=`cat $LocalIP | awk -F"." {'print $1'}`
> B=`cat $LocalIP | awk -F"." {'print $2'}`
> C=`cat $LocaLIP | awk -F"." {'print $3'}`
> echo $A"."$B"."$C".0/24"
>
--
Please report bugs to [EMAIL PROTECTED]
Please mail [EMAIL PROTECTED] (only) to discuss security issues
Support for registered customers and partners to [EMAIL PROTECTED]
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
Archives by mail and http://www.mail-archive.com/devinfo%40lists.e-smith.org
