Hey, mokie, there’s a few things you are missing to be the typical UNIX ass: a beard and suspenders. Once you do that, you will fit the mold.

Hey, mokie, there’s a few things you are missing to be the typical UNIX ass: a beard and suspenders. Once you do that, you will fit the mold.

Why would you want to do that? No one should ever have to do that. Furthermore, I know how to do exactly what you’d want to do, but since no one should ever need to do that, I won’t tell you, and my assholery will be visible to google searchers for years to come.

Seriously though, I don’t even touch that stuff. Perl is greek to me.

Why would you want to do that? No one should ever have to do that. Furthermore, I know how to do exactly what you’d want to do, but since no one should ever need to do that, I won’t tell you, and my assholery will be visible to google searchers for years to come.

Seriously though, I don’t even touch that stuff. Perl is greek to me.

R.O.B.: That was the answer I was looking for. I wanted to make sure that I had the concatenation right. I will be seeing if this works in short order.

As for the randomness, I am really just picking from a bunch of text files, so I could care less. As long as it randomizes what it picks, that works. No need for it to be secure.

R.O.B.: That was the answer I was looking for. I wanted to make sure that I had the concatenation right. I will be seeing if this works in short order.

As for the randomness, I am really just picking from a bunch of text files, so I could care less. As long as it randomizes what it picks, that works. No need for it to be secure.

my $logfile = “F:/dir1/dir2/tip” . $random_number . ”.txt”;

Another thing – as I’m sure you know, random numbers aren’t truly random. I don’t know how secure this needs to be, but you can use the srand function before calling rand to change the seed used.

If you want something even more random than that, there’s a package called Math::TrulyRandom that you can find in CPAN.

my $logfile = “F:/dir1/dir2/tip” . $random_number . ”.txt”;

Another thing – as I’m sure you know, random numbers aren’t truly random. I don’t know how secure this needs to be, but you can use the srand function before calling rand to change the seed used.

If you want something even more random than that, there’s a package called Math::TrulyRandom that you can find in CPAN.

Convert.pl:open(FILEIN,” $OutputFile”) || die “open() on $OutputFile failed. $!\n”;

and if you want to go (perhaps) overboard youc an do things like this:

open(ACTIVE_HOSTS, “$NMAP $NMAP_OPTIONS -PT \
$PingPort $NETWORK | \
$GREP -v \”Nmap run completed\” | \
$GREP -v \”Starting nmap\” | \
$GREP -v \”TCP probe port is\” |”) || \
die “failed to open pipes: $!\n”;
push(@ActiveHosts,);
close(ACTIVE_HOSTS);

You now have the resulst of that nmap (minus the grep -v’s) in the array ActiveHosts.

Convert.pl:open(FILEIN,” $OutputFile”) || die “open() on $OutputFile failed. $!n”;

and if you want to go (perhaps) overboard youc an do things like this:

open(ACTIVE_HOSTS, “$NMAP $NMAP_OPTIONS -PT
$PingPort $NETWORK |
$GREP -v “Nmap run completed” |
$GREP -v “Starting nmap” |
$GREP -v “TCP probe port is” |”) ||
die “failed to open pipes: $!n”;
push(@ActiveHosts,);
close(ACTIVE_HOSTS);

You now have the resulst of that nmap (minus the grep -v’s) in the array ActiveHosts.