$file = '/home/steven/http.list';
open(INFO, $file);
@lines = <INFO>;
close(INFO);