#!/usr/bin/perl

$arg = shift;
$arg2 = shift;

@return = split(" ", qx[/usr/bin/nmap -sP $arg]);

print "@return\n";

sleep 2;

@return2 = split(" ", qx[/usr/bin/nmap -sP $arg2]);

print "@return2\n";