Which part of the process, particularly are you having trouble with? If you post your code, and any error messages you'll receive a lot more useful help.

For instance, if you have your list of songs formatted with one song per line then the following would work:

#!/usr/bin/perl -s
@ARGV == 1 or die "usage ThisScript filename\n";
$list_of_songs=$ARGV[0];
chomp $list_of_songs;
open ($LOS, "$list_of_songs") or die "$list_of_songs cannot be opened 
+for reading \n";
@songs=<$LOS>;
close($LOS);

foreach $song_title (@songs)
{
   chomp $song_title;
   search_limewire($song_title);
}
[download]