# substr EXPR,OFFSET,LENGTH,REPLACEMENT

    my $n    = 3;

    my $str1 = "1234567890\n";
    my $str2 = substr($str1, $n);

    print $str1; # 1234567890
    print $str2; # 4567890