Use substr: $se7en = substr $callerid, -7.

If you really insist, you could say ($se7en) = ($callerid =~ /(.{7})$/);. But you really want to use a regexp only if you want to validate $callerid at the same time (for instance, to ensure the last 7 characters really are digits). To do that, you'll have to read perlre.