1 # -*- Mode: cperl; coding: utf-8; cperl-indent-level: 4 -*-
2 # vim: ts=4 sts=4 sw=4:
4 use overload '""' => "as_string", fallback => 1;
5 # accessors: TEXT(the url string), FROM(DEF=>defaultlist,USER=>urllist),
6 # planned are things like age or quality
14 my($class,%args) = @_;