I have to remove the first part of a dot-separated string. Such as:

```none
test.domain.com          --> domain.com
sub.domain.example.com   --> domain.example.com
bar.foo.bar.hoster.net   --> foo.bar.hoster.net

```

and so on...

How to do this in perl?