Help for this page

Select Code to Download

Select or download this

while ( <DATA> )
{
    print if /\Ahttps.*[^\/]\n\z/;
...
httpsux
https://perlmonks.org/?
https://mail.google.com/mail/#inbox

Select or download this

httpsux
https://perlmonks.org/?
https://mail.google.com/mail/#inbox