shorturl 0.1.0 → 0.2.0

data/ChangeLog

@@ -1,3 +1,5 @@
+0.2.0:
+	- Added shorl.com, snipurl.com and metamark.net
 0.1.0:
 	- Refactored the tinyurl and rubyurl methods
 	- URI.extract to get URLs instead of regular expressions
@@ -7,4 +9,4 @@
 	- Made tinyurl, rubyurl and get_short_url private class methods
 	
 0.0.1:
-	- Initial Version
+	- Initial release

data/README

@@ -13,6 +13,13 @@ call-seq:
   puts ShortURL.shorten("http://mypage.com")
   puts ShortURL.shorten("http://mypage.com", :tinyurl)
 
+The second parameter represents the service you want to use.  These are:
+- <tt>:rubyurl</tt>
+- <tt>:tinyurl</tt>
+- <tt>:snorl</tt>
+- <tt>:snipurl</tt>
+- <tt>:metamark</tt>
+
 == Thanks
 - Marcel Molina Jr., Devin Mullins for some ideas
 - imperator from #ruby-lang (don't know your real name, sorry) for

data/doc/classes/ShortURL.html

@@ -87,8 +87,11 @@
 
       <div class="name-list">
       <a href="#M000002">get_short_url</a>&nbsp;&nbsp;
+      <a href="#M000007">metamark</a>&nbsp;&nbsp;
       <a href="#M000003">rubyurl</a>&nbsp;&nbsp;
+      <a href="#M000005">shorl</a>&nbsp;&nbsp;
       <a href="#M000001">shorten</a>&nbsp;&nbsp;
+      <a href="#M000006">snipurl</a>&nbsp;&nbsp;
       <a href="#M000004">tinyurl</a>&nbsp;&nbsp;
       </div>
     </div>
@@ -154,9 +157,12 @@ call-seq:
 27:     <span class="ruby-keyword kw">case</span> <span class="ruby-identifier">service</span>
 28:     <span class="ruby-keyword kw">when</span> <span class="ruby-identifier">:rubyurl</span> <span class="ruby-keyword kw">then</span> <span class="ruby-identifier">rubyurl</span>(<span class="ruby-identifier">url</span>)
 29:     <span class="ruby-keyword kw">when</span> <span class="ruby-identifier">:tinyurl</span> <span class="ruby-keyword kw">then</span> <span class="ruby-identifier">tinyurl</span>(<span class="ruby-identifier">url</span>)
-30:     <span class="ruby-keyword kw">else</span> <span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>, <span class="ruby-value str">&quot;Invalid service&quot;</span>
-31:     <span class="ruby-keyword kw">end</span>
-32:   <span class="ruby-keyword kw">end</span>
+30:     <span class="ruby-keyword kw">when</span> <span class="ruby-identifier">:shorl</span> <span class="ruby-keyword kw">then</span> <span class="ruby-identifier">shorl</span>(<span class="ruby-identifier">url</span>)
+31:     <span class="ruby-keyword kw">when</span> <span class="ruby-identifier">:snipurl</span> <span class="ruby-keyword kw">then</span> <span class="ruby-identifier">snipurl</span>(<span class="ruby-identifier">url</span>)
+32:     <span class="ruby-keyword kw">when</span> <span class="ruby-identifier">:metamark</span> <span class="ruby-keyword kw">then</span> <span class="ruby-identifier">metamark</span>(<span class="ruby-identifier">url</span>)
+33:     <span class="ruby-keyword kw">else</span> <span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>, <span class="ruby-value str">&quot;Invalid service&quot;</span>
+34:     <span class="ruby-keyword kw">end</span>
+35:   <span class="ruby-keyword kw">end</span>
 </pre>
           </div>
         </div>
@@ -191,20 +197,51 @@ Parameters:
             onclick="toggleCode('M000002-source');return false;">[Source]</a></p>
           <div class="method-source-code" id="M000002-source">
 <pre>
-    <span class="ruby-comment cmt"># File lib/shorturl.rb, line 42</span>
-42:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">get_short_url</span>(<span class="ruby-identifier">hostname</span>, <span class="ruby-identifier">code</span>, <span class="ruby-identifier">action</span>, <span class="ruby-operator">&amp;</span><span class="ruby-identifier">block</span>) <span class="ruby-comment cmt"># :yields: html_body</span>
-43:     <span class="ruby-keyword kw">begin</span>
-44:       <span class="ruby-constant">Net</span><span class="ruby-operator">::</span><span class="ruby-constant">HTTP</span>.<span class="ruby-identifier">start</span>(<span class="ruby-identifier">hostname</span>, <span class="ruby-value">80</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">http</span><span class="ruby-operator">|</span>
-45:         <span class="ruby-identifier">response</span> = <span class="ruby-identifier">http</span>.<span class="ruby-identifier">instance_eval</span>(<span class="ruby-identifier">action</span>)
-46:         
-47:         <span class="ruby-keyword kw">if</span> <span class="ruby-identifier">response</span>.<span class="ruby-identifier">code</span> <span class="ruby-operator">==</span> <span class="ruby-identifier">code</span>.<span class="ruby-identifier">to_s</span>
-48:           <span class="ruby-identifier">block</span>.<span class="ruby-identifier">call</span>(<span class="ruby-identifier">response</span>.<span class="ruby-identifier">read_body</span>)
-49:         <span class="ruby-keyword kw">end</span>
-50:       }
-51:     <span class="ruby-keyword kw">rescue</span> <span class="ruby-constant">SocketError</span>, <span class="ruby-constant">Net</span><span class="ruby-operator">::</span><span class="ruby-constant">HTTPExceptions</span> =<span class="ruby-operator">&gt;</span> <span class="ruby-identifier">e</span>
-52:       <span class="ruby-keyword kw">return</span> <span class="ruby-keyword kw">nil</span>
-53:     <span class="ruby-keyword kw">end</span>
-54:   <span class="ruby-keyword kw">end</span>
+    <span class="ruby-comment cmt"># File lib/shorturl.rb, line 45</span>
+45:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">get_short_url</span>(<span class="ruby-identifier">hostname</span>, <span class="ruby-identifier">code</span>, <span class="ruby-identifier">action</span>, <span class="ruby-operator">&amp;</span><span class="ruby-identifier">block</span>) <span class="ruby-comment cmt"># :yields: html_body</span>
+46:     <span class="ruby-keyword kw">begin</span>
+47:       <span class="ruby-constant">Net</span><span class="ruby-operator">::</span><span class="ruby-constant">HTTP</span>.<span class="ruby-identifier">start</span>(<span class="ruby-identifier">hostname</span>, <span class="ruby-value">80</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">http</span><span class="ruby-operator">|</span>
+48:         <span class="ruby-identifier">response</span> = <span class="ruby-identifier">http</span>.<span class="ruby-identifier">instance_eval</span>(<span class="ruby-identifier">action</span>)
+49:         
+50:         <span class="ruby-keyword kw">if</span> <span class="ruby-identifier">response</span>.<span class="ruby-identifier">code</span> <span class="ruby-operator">==</span> <span class="ruby-identifier">code</span>.<span class="ruby-identifier">to_s</span>
+51:           <span class="ruby-identifier">block</span>.<span class="ruby-identifier">call</span>(<span class="ruby-identifier">response</span>.<span class="ruby-identifier">read_body</span>)
+52:         <span class="ruby-keyword kw">end</span>
+53:       }
+54:     <span class="ruby-keyword kw">rescue</span> <span class="ruby-constant">SocketError</span>, <span class="ruby-constant">Net</span><span class="ruby-operator">::</span><span class="ruby-constant">HTTPExceptions</span> =<span class="ruby-operator">&gt;</span> <span class="ruby-identifier">e</span>
+55:       <span class="ruby-keyword kw">return</span> <span class="ruby-keyword kw">nil</span>
+56:     <span class="ruby-keyword kw">end</span>
+57:   <span class="ruby-keyword kw">end</span>
+</pre>
+          </div>
+        </div>
+      </div>
+
+      <div id="method-M000007" class="method-detail">
+        <a name="M000007"></a>
+
+        <div class="method-heading">
+          <a href="#M000007" class="method-signature">
+          <span class="method-name">metamark</span><span class="method-args">(url)</span>
+          </a>
+        </div>
+      
+        <div class="method-description">
+          <p>
+Shorten a URL with metamark.com. Same technique as TinyURL
+</p>
+          <p><a class="source-toggle" href="#"
+            onclick="toggleCode('M000007-source');return false;">[Source]</a></p>
+          <div class="method-source-code" id="M000007-source">
+<pre>
+     <span class="ruby-comment cmt"># File lib/shorturl.rb, line 107</span>
+107:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">metamark</span>(<span class="ruby-identifier">url</span>)
+108:     <span class="ruby-identifier">get_short_url</span>(<span class="ruby-value str">&quot;metamark.net&quot;</span>, <span class="ruby-value">200</span>,
+109:                   <span class="ruby-node">&quot;post('/add', 'long_url=#{url}')&quot;</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">body</span><span class="ruby-operator">|</span>
+110:       <span class="ruby-identifier">line</span> = <span class="ruby-identifier">body</span>.<span class="ruby-identifier">split</span>(<span class="ruby-value str">&quot;\n&quot;</span>).<span class="ruby-identifier">find</span> { <span class="ruby-operator">|</span><span class="ruby-identifier">l</span><span class="ruby-operator">|</span> <span class="ruby-identifier">l</span> <span class="ruby-operator">=~</span> <span class="ruby-regexp re">/xrl\.us/</span> }
+111:       <span class="ruby-identifier">short_url</span> = <span class="ruby-constant">URI</span>.<span class="ruby-identifier">extract</span>(<span class="ruby-identifier">line</span>)[<span class="ruby-value">0</span>]
+112:       <span class="ruby-keyword kw">return</span> <span class="ruby-identifier">short_url</span>
+113:     }
+114:   <span class="ruby-keyword kw">end</span>
 </pre>
           </div>
         </div>
@@ -231,14 +268,75 @@ with gsub.
             onclick="toggleCode('M000003-source');return false;">[Source]</a></p>
           <div class="method-source-code" id="M000003-source">
 <pre>
-    <span class="ruby-comment cmt"># File lib/shorturl.rb, line 62</span>
-62:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">rubyurl</span>(<span class="ruby-identifier">url</span>)
-63:     <span class="ruby-identifier">get_short_url</span>(<span class="ruby-value str">&quot;rubyurl.com&quot;</span>, <span class="ruby-value">302</span>,
-64:                   <span class="ruby-node">&quot;get('/rubyurl/create?rubyurl[website_url]=#{CGI.escape(url)}')&quot;</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">body</span><span class="ruby-operator">|</span>
-65:       <span class="ruby-identifier">short_url</span> = <span class="ruby-constant">URI</span>.<span class="ruby-identifier">extract</span>(<span class="ruby-identifier">body</span>)[<span class="ruby-value">0</span>].<span class="ruby-identifier">gsub</span>(<span class="ruby-value str">&quot;rubyurl/show/&quot;</span>, <span class="ruby-value str">&quot;&quot;</span>)
-66:       <span class="ruby-keyword kw">return</span> <span class="ruby-identifier">short_url</span>
-67:     }
-68:   <span class="ruby-keyword kw">end</span>
+    <span class="ruby-comment cmt"># File lib/shorturl.rb, line 65</span>
+65:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">rubyurl</span>(<span class="ruby-identifier">url</span>)
+66:     <span class="ruby-identifier">get_short_url</span>(<span class="ruby-value str">&quot;rubyurl.com&quot;</span>, <span class="ruby-value">302</span>,
+67:                   <span class="ruby-node">&quot;get('/rubyurl/create?rubyurl[website_url]=#{CGI.escape(url)}')&quot;</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">body</span><span class="ruby-operator">|</span>
+68:       <span class="ruby-identifier">short_url</span> = <span class="ruby-constant">URI</span>.<span class="ruby-identifier">extract</span>(<span class="ruby-identifier">body</span>)[<span class="ruby-value">0</span>].<span class="ruby-identifier">gsub</span>(<span class="ruby-value str">&quot;rubyurl/show/&quot;</span>, <span class="ruby-value str">&quot;&quot;</span>)
+69:       <span class="ruby-keyword kw">return</span> <span class="ruby-identifier">short_url</span>
+70:     }
+71:   <span class="ruby-keyword kw">end</span>
+</pre>
+          </div>
+        </div>
+      </div>
+
+      <div id="method-M000005" class="method-detail">
+        <a name="M000005"></a>
+
+        <div class="method-heading">
+          <a href="#M000005" class="method-signature">
+          <span class="method-name">shorl</span><span class="method-args">(url)</span>
+          </a>
+        </div>
+      
+        <div class="method-description">
+          <p>
+Shorten a URL through with shorl.com. Same technique as TinyURL
+</p>
+          <p><a class="source-toggle" href="#"
+            onclick="toggleCode('M000005-source');return false;">[Source]</a></p>
+          <div class="method-source-code" id="M000005-source">
+<pre>
+    <span class="ruby-comment cmt"># File lib/shorturl.rb, line 88</span>
+88:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">shorl</span>(<span class="ruby-identifier">url</span>)
+89:     <span class="ruby-identifier">get_short_url</span>(<span class="ruby-value str">&quot;shorl.com&quot;</span>, <span class="ruby-value">200</span>,
+90:                   <span class="ruby-node">&quot;post('/create.php', 'url=#{url}')&quot;</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">body</span><span class="ruby-operator">|</span>
+91:       <span class="ruby-identifier">short_url</span> = <span class="ruby-constant">URI</span>.<span class="ruby-identifier">extract</span>(<span class="ruby-identifier">body</span>)[<span class="ruby-value">2</span>]
+92:       <span class="ruby-keyword kw">return</span> <span class="ruby-identifier">short_url</span>
+93:     }
+94:   <span class="ruby-keyword kw">end</span>
+</pre>
+          </div>
+        </div>
+      </div>
+
+      <div id="method-M000006" class="method-detail">
+        <a name="M000006"></a>
+
+        <div class="method-heading">
+          <a href="#M000006" class="method-signature">
+          <span class="method-name">snipurl</span><span class="method-args">(url)</span>
+          </a>
+        </div>
+      
+        <div class="method-description">
+          <p>
+Shorten a URL with snipurl.com. Same technique as TinyURL
+</p>
+          <p><a class="source-toggle" href="#"
+            onclick="toggleCode('M000006-source');return false;">[Source]</a></p>
+          <div class="method-source-code" id="M000006-source">
+<pre>
+     <span class="ruby-comment cmt"># File lib/shorturl.rb, line 97</span>
+ 97:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">snipurl</span>(<span class="ruby-identifier">url</span>)
+ 98:     <span class="ruby-identifier">get_short_url</span>(<span class="ruby-value str">&quot;snipurl.com&quot;</span>, <span class="ruby-value">200</span>,
+ 99:                   <span class="ruby-node">&quot;post('/index.php', 'link=#{url}')&quot;</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">body</span><span class="ruby-operator">|</span>
+100:       <span class="ruby-identifier">line</span> = <span class="ruby-identifier">body</span>.<span class="ruby-identifier">split</span>(<span class="ruby-value str">&quot;\n&quot;</span>).<span class="ruby-identifier">grep</span>(<span class="ruby-regexp re">/txt/</span>)[<span class="ruby-value">0</span>]
+101:       <span class="ruby-identifier">short_url</span> = <span class="ruby-constant">URI</span>.<span class="ruby-identifier">extract</span>(<span class="ruby-identifier">line</span>)[<span class="ruby-value">1</span>][<span class="ruby-value">0</span><span class="ruby-operator">..</span><span class="ruby-value">-2</span>] <span class="ruby-comment cmt"># Remove trailing '</span>
+102:       <span class="ruby-keyword kw">return</span> <span class="ruby-identifier">short_url</span>
+103:     }
+104:   <span class="ruby-keyword kw">end</span>
 </pre>
           </div>
         </div>
@@ -264,15 +362,15 @@ shortened URL and extract it.
             onclick="toggleCode('M000004-source');return false;">[Source]</a></p>
           <div class="method-source-code" id="M000004-source">
 <pre>
-    <span class="ruby-comment cmt"># File lib/shorturl.rb, line 75</span>
-75:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">tinyurl</span>(<span class="ruby-identifier">url</span>)
-76:     <span class="ruby-identifier">get_short_url</span>(<span class="ruby-value str">&quot;tinyurl.com&quot;</span>, <span class="ruby-value">200</span>,
-77:                   <span class="ruby-node">&quot;post('/create.php', 'url=#{url}')&quot;</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">body</span><span class="ruby-operator">|</span>
-78:       <span class="ruby-identifier">line</span> = <span class="ruby-identifier">body</span>.<span class="ruby-identifier">split</span>(<span class="ruby-value str">&quot;\n&quot;</span>).<span class="ruby-identifier">find</span> { <span class="ruby-operator">|</span><span class="ruby-identifier">l</span><span class="ruby-operator">|</span> <span class="ruby-identifier">l</span> <span class="ruby-operator">=~</span> <span class="ruby-regexp re">/hidden name=tinyurl/</span> }
-79:       <span class="ruby-identifier">short_url</span> = <span class="ruby-constant">URI</span>.<span class="ruby-identifier">extract</span>(<span class="ruby-identifier">line</span>)[<span class="ruby-value">0</span>]
-80:       <span class="ruby-keyword kw">return</span> <span class="ruby-identifier">short_url</span>
-81:     }
-82:   <span class="ruby-keyword kw">end</span>
+    <span class="ruby-comment cmt"># File lib/shorturl.rb, line 78</span>
+78:   <span class="ruby-keyword kw">def</span> <span class="ruby-keyword kw">self</span>.<span class="ruby-identifier">tinyurl</span>(<span class="ruby-identifier">url</span>)
+79:     <span class="ruby-identifier">get_short_url</span>(<span class="ruby-value str">&quot;tinyurl.com&quot;</span>, <span class="ruby-value">200</span>,
+80:                   <span class="ruby-node">&quot;post('/create.php', 'url=#{url}')&quot;</span>) { <span class="ruby-operator">|</span><span class="ruby-identifier">body</span><span class="ruby-operator">|</span>
+81:       <span class="ruby-identifier">line</span> = <span class="ruby-identifier">body</span>.<span class="ruby-identifier">split</span>(<span class="ruby-value str">&quot;\n&quot;</span>).<span class="ruby-identifier">find</span> { <span class="ruby-operator">|</span><span class="ruby-identifier">l</span><span class="ruby-operator">|</span> <span class="ruby-identifier">l</span> <span class="ruby-operator">=~</span> <span class="ruby-regexp re">/hidden name=tinyurl/</span> }
+82:       <span class="ruby-identifier">short_url</span> = <span class="ruby-constant">URI</span>.<span class="ruby-identifier">extract</span>(<span class="ruby-identifier">line</span>)[<span class="ruby-value">0</span>]
+83:       <span class="ruby-keyword kw">return</span> <span class="ruby-identifier">short_url</span>
+84:     }
+85:   <span class="ruby-keyword kw">end</span>
 </pre>
           </div>
         </div>

data/doc/created.rid

@@ -1 +1 @@
-Thu Jun 02 18:25:20 EDT 2005
+Fri Jun 03 21:04:57 EDT 2005

data/doc/files/ChangeLog.html

@@ -56,7 +56,7 @@
     </tr>
     <tr class="top-aligned-row">
       <td><strong>Last Update:</strong></td>
-      <td>Thu Jun 02 17:27:57 EDT 2005</td>
+      <td>Fri Jun 03 20:59:42 EDT 2005</td>
     </tr>
     </table>
   </div>
@@ -70,6 +70,12 @@
 
     <div id="description">
       <p>
+0.2.0:
+</p>
+<pre>
+        - Added shorl.com, snipurl.com and metamark.net
+</pre>
+<p>
 0.1.0:
 </p>
 <pre>
@@ -84,7 +90,7 @@
 0.0.1:
 </p>
 <pre>
-        - Initial Version
+        - Initial release
 </pre>
 
     </div>

data/doc/files/README.html

@@ -56,7 +56,7 @@
     </tr>
     <tr class="top-aligned-row">
       <td><strong>Last Update:</strong></td>
-      <td>Thu Jun 02 18:25:07 EDT 2005</td>
+      <td>Fri Jun 03 21:01:00 EDT 2005</td>
     </tr>
     </table>
   </div>
@@ -88,6 +88,26 @@ call-seq:
   puts ShortURL.shorten(&quot;http://mypage.com&quot;)
   puts ShortURL.shorten(&quot;http://mypage.com&quot;, :tinyurl)
 </pre>
+<p>
+The second parameter represents the service you want to use. These are:
+</p>
+<ul>
+<li><tt>:rubyurl</tt>
+
+</li>
+<li><tt>:tinyurl</tt>
+
+</li>
+<li><tt>:snorl</tt>
+
+</li>
+<li><tt>:snipurl</tt>
+
+</li>
+<li><tt>:metamark</tt>
+
+</li>
+</ul>
 <h2>Thanks</h2>
 <ul>
 <li>Marcel Molina Jr., Devin Mullins for some ideas

data/doc/files/lib/shorturl_rb.html

@@ -56,7 +56,7 @@
     </tr>
     <tr class="top-aligned-row">
       <td><strong>Last Update:</strong></td>
-      <td>Thu Jun 02 18:23:38 EDT 2005</td>
+      <td>Fri Jun 03 21:03:56 EDT 2005</td>
     </tr>
     </table>
   </div>

data/doc/fr_method_index.html

@@ -21,8 +21,11 @@
   <h1 class="section-bar">Methods</h1>
   <div id="index-entries">
     <a href="classes/ShortURL.html#M000002">get_short_url (ShortURL)</a><br />
+    <a href="classes/ShortURL.html#M000007">metamark (ShortURL)</a><br />
     <a href="classes/ShortURL.html#M000003">rubyurl (ShortURL)</a><br />
+    <a href="classes/ShortURL.html#M000005">shorl (ShortURL)</a><br />
     <a href="classes/ShortURL.html#M000001">shorten (ShortURL)</a><br />
+    <a href="classes/ShortURL.html#M000006">snipurl (ShortURL)</a><br />
     <a href="classes/ShortURL.html#M000004">tinyurl (ShortURL)</a><br />
   </div>
 </div>

data/lib/shorturl.rb

@@ -27,6 +27,9 @@ class ShortURL
     case service
     when :rubyurl then rubyurl(url)
     when :tinyurl then tinyurl(url)
+    when :shorl then shorl(url)
+    when :snipurl then snipurl(url)
+    when :metamark then metamark(url)
     else raise ArgumentError, "Invalid service"
     end
   end
@@ -81,5 +84,35 @@ class ShortURL
     }
   end
 
-  private_class_method :get_short_url, :tinyurl, :rubyurl
+  # Shorten a URL through with shorl.com.  Same technique as TinyURL
+  def self.shorl(url)
+    get_short_url("shorl.com", 200,
+                  "post('/create.php', 'url=#{url}')") { |body|
+      short_url = URI.extract(body)[2]
+      return short_url
+    }
+  end
+
+  # Shorten a URL with snipurl.com.  Same technique as TinyURL
+  def self.snipurl(url)
+    get_short_url("snipurl.com", 200,
+                  "post('/index.php', 'link=#{url}')") { |body|
+      line = body.split("\n").grep(/txt/)[0]
+      short_url = URI.extract(line)[1][0..-2] # Remove trailing '
+      return short_url
+    }
+  end
+
+  # Shorten a URL with metamark.com.  Same technique as TinyURL
+  def self.metamark(url)
+    get_short_url("metamark.net", 200,
+                  "post('/add', 'long_url=#{url}')") { |body|
+      line = body.split("\n").find { |l| l =~ /xrl\.us/ }
+      short_url = URI.extract(line)[0]
+      return short_url
+    }
+  end
+  
+  private_class_method(:get_short_url, :tinyurl, :rubyurl, :shorl,
+                       :snipurl, :metamark)
 end

data/test/tc_shorturl.rb

@@ -24,6 +24,13 @@ class TestShortURL < Test::Unit::TestCase
     assert ShortURL.shorten(@url) == "http://rubyurl.com/Q9ToW"
     assert ShortURL.shorten(@url, :rubyurl) == "http://rubyurl.com/Q9ToW"
     assert ShortURL.shorten(@url, :tinyurl) == "http://tinyurl.com/9mop8"
+
+    # The short URL for shorl is never the same, so I just check to
+    # see if the URL begins with their domain name
+    assert ShortURL.shorten(@url, :shorl) =~ /^http:\/\/shorl.com\//  
+    assert ShortURL.shorten(@url, :snipurl) == "http://snipurl.com/fbkl"
+    assert ShortURL.shorten(@url, :metamark) == "http://xrl.us/ga8c"
+
     assert_raise(ArgumentError) { ShortURL.shorten(@url, :foobar) }
   end
 
@@ -57,4 +64,16 @@ class TestShortURL < Test::Unit::TestCase
   def test_tinyurl
     assert_raise(NoMethodError) { ShortURL.tinyurl(@url) }
   end
+
+  def test_shorl
+    assert_raise(NoMethodError) { ShortURL.shorl(@url) }
+  end
+
+  def test_snipurl
+    assert_raise(NoMethodError) { ShortURL.snipurl(@url) }
+  end
+
+  def test_metamark
+    assert_raise(NoMethodError) { ShortURL.metamark(@url) }
+  end
 end

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.8.10
 specification_version: 1
 name: shorturl
 version: !ruby/object:Gem::Version 
-  version: 0.1.0
-date: 2005-06-02
+  version: 0.2.0
+date: 2005-06-03
 summary: Shortens URLs using services such as TinyURL and RubyURL
 require_paths: 
   - lib