How many ways How many ways does Perl have to cut off the first char of a string?

At a first glance it seems that this has not been mentioned yet, although basically it may be thought of as a variation of several of those that have been:

$ perl -lne 'print for /(.)(.*)/'
dfdfsdgdfs
d
fdfsdgdfs
stgsghttsthe
s
tgsghttsthe
[download]