Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl
    
    ...
    use String qw(is_SecureUrl);
    
    print is_SecureUrl("https://github.com/"), "\n";
    
  2. or download this
    #!/usr/bin/env perl
    
    ...
    print is_SecureUrl("https://github.com/"), "\n";
    
    assert_SecureUrl("http://evil.com/");