Server: win1  ID: D: Space: 6496911360
Server: ux22  ID: D: Space: 7973826560
Server: del2  ID: U: Space: 7973228544

##</code><code>##

open (INPUT, "data") || die "couldn't open the file!";

   foreach $line  (<INPUT>) {
    ($SERVER, $Drive, $SPACE) = split(/:/,$line);
     
   }

   close(INPUT);