How to enumerate hosts on your network depends on how much information you have to start with, and what kind of network it is. In a pinch, you can use Net::Ping for a scan, but you may be able to use gethostbyaddr with better effect. For copying files to other hosts, look at Net::SCP.

Depending on your network's topology and complexity, you might find it most reliable to query your router. I have a fairly inexpensive Netgear router that has various configuration web pages, one of which offers a list of assigned IP's and their names. Just screen scrape the router's attached-devices page, and process the results accordingly.

To do it this way, assuming your router serves a web configuration page, just look at using WWW::Mechanize, or LWP::UserAgent (from which WWW::Mechanize inherits.

#!/usr/bin/perl 
use strict;
use warnings;
use diagnostics;

use Net::Ping;
my $i;
my $host;
my $p = Net::Ping->new("syn");
   $p -> bind("10.90.1.27");

for( $i = 0; $i <= 254; $i++) {
     $host = "10.90.1.$i";
     $p -> ping("$host", 2);
     print("$host\n") if pingecho($host);
 }
[download]

use strict;
use warnings;
use Net::Netmask;

my $spec  = ...;
my $block = Net::Netmask->new2($spec) or die "bad spec";
my $base  = $block->base;
my $bcast = $block->broadcast;
my @ip    = $block->enumerate;

for (@ip) {

  next if @ip > 1 and $_ eq $base;
  next if @ip > 1 and $_ eq $bcast;

  ...

}
[download]

-><- -><- -><- -><- -><-
All things are Perfect
    To every last Flaw
    And bound in accord
         With Eris's Law
 - HBT; The Book of Advice, 1:7