my @tmp = qw/1.zip 2.zip 3.zip 4.zip 5.zip 6.zip 7.zip 8.zip 9.zip/;

Directory location:

Source-----                                      Destination
/home/svr/1.0                                  
/home/des/Disk1/Linux                  
                     /CD_RH_1
                     /CD_RH_2
                     /CD_RH_3
                     /CD_RH_4
foreach (@tmp) to find

/home/svr/1.0/CD_RH_2/1.zip => 2 gb [copy to destination] 
/home/svr/1.0/CD_RH_1/2.zip => 1 gb [copy to destination]
--------------So only 1.zip and 2.zip can fit in /home/des/Disk1/Linux
                  Adding 3.zip would go over 4 gb 
--------------mkdir  /home/des/Disk2/Linux
/home/svr/1.0/CD_RH_3/3.zip  => 2gb [copy to destination]
--------------only 3.zip can ! fit in /home/des/Disk2/Linux
                  Adding 4.zip would go over 4 gb 
--------------mkdir  /home/des/Disk3/Linux
/home/svr/1.0/CD_RH_4/4.zip => 2.5gb [copy to destination]
/home/svr/1.0/CD_RH_2/5.zip => .5mb [copy to destination]
/home/svr/1.0/CD_RH_1/6.zip => .25gb [copy to destination]
/home/svr/1.0/CD_RH_3/7.zip => 112.5mb [copy to destination]
/home/svr/1.0/CD_RH_4/8.zip => 22.5mb [copy to destination]
/home/svr/1.0/CD_RH_4/9.zip => 122.5kb [copy to destination]
--------------copy 4.zip 5.zip 6.zip 7.zip 8.zip 9.zip to /home/des/Disk3/Linux