# die ersten 5 d werden ersetzt
~ $ perl -wE '$aa = "dddddd"; $aa =~ s/^d{5}//; say $aa'
d

# nix wird ersetzt, weil kein Treffer
~ $ perl -wE '$aa = "123456"; $aa =~ s/^d{5}//; say $aa'
123456

# die ersten 5 beliebigen Zeichen werden ersetzt
~ $ perl -wE '$aa = "123456"; $aa =~ s/^.{5}//; say $aa'
6

# die ersten 5 Ziffern werden ersetzt
~ $ perl -wE '$aa = "123456"; $aa =~ s/^\d{5}//; say $aa'
6
~ $