title: Perl URI class wrongly parse user info | Importance of strict and warnings in perl
body: <pre><code>use URI;
  my $url = new URI("ssh://username@host/path/to/file.txt");
  print "User: ", $url-&gt;user, "\n";
  print "Host: ", $url-&gt;host, "\n";
  print "Path: ", $url-&gt;path, "\n";
  
  output&gt;&gt;&gt;
      User:
      Host: username
      Path: /path/to/file.txt
  
   expected output&gt;&gt;&gt;
      User: username
      Host: host
      Path: /path/to/file.txt
  </code></pre>
  
  <p>Another example</p>
  
  <pre><code>use URI; 
  my $url = new URI("ssh://username@host/path/to/file.txt");
  print $url-&gt;as_string;
  
  output&gt;&gt;&gt;
  ssh://username/path/to/file.txt
  </code></pre>
  
  <p>This clearly a bug right? But no one seems to be bothered at all! No one reported this bug in <a href="https://rt.cpan.org/Public/Dist/Display.html?Name=URI" rel="nofollow noreferrer">https://rt.cpan.org/Public/Dist/Display.html?Name=URI</a>. I tried to report one but getting bitcard account sucks.</p>
  
  <p>What are you using in your case? Simple regex?</p>
  
  <p>What I am using?</p>
  
  <ul>
  <li>Perl version: v5.10.1</li>
  <li>URI version : 1.37</li>
  </ul>