- $sort = "Spider" if $uref->sort eq 'S';
- $sort = "AK1A " if $uref->sort eq 'A';
- $sort = "clx " if $uref->sort eq 'C';
- $sort = "Fred " if $uref->sort eq 'U';
- $sort = "BBS " if $uref->sort eq 'B';
+ $sort = "Unknwn";
+ $sort = "Spider" if $uref->is_spider;
+ $sort = "AK1A " if $uref->is_ak1a;
+ $sort = "Clx " if $uref->is_clx;
+ $sort = "User " if $uref->is_user;
+ $sort = "BBS " if $uref->is_bbs;
+ $sort = "DXNet " if $uref->is_dxnet;
+ $sort = "ARClus" if $uref->is_arcluster;