r1778@llin: dpavlin | 2009-04-22 01:17:12 +0200
[webpac2] / vhost / ecas / html.pm
1 package ecas::html;
2
3 use strict;
4 use warnings;
5
6 sub url {
7         my ($self,$url) = @_;
8         qq{<a href="$url">$url</a>};
9 }
10
11 1;