If you do not need to know if it was https you can reduce them all to http:// when you read each line in with something like s!https://!http://!; just after the while(<DATA>) {. Note the use of ! as a regex delimiter stops you having a quoting nightmare with the //

Cheers,
R.