65c65,66
<             Param('mode|m')->default('text')
---
>             Param('mode|m')->default('text'),
>                                               Param('info|i')->default('friends'),
71a73
> my $info = $opt->get_info();
74c76,79
< my $content = get("http://ws.audioscrobbler.com/1.0/user/${user}/friends.xml");
---
> my $feed=$info eq 'neighbours'
>               ?"http://ws.audioscrobbler.com/1.0/user/${user}/neighbours.xml"
>               :"http://ws.audioscrobbler.com/1.0/user/${user}/friends.xml";
> my $content = get($feed);