Re: ASCII Rulers

[MrNobo1024]

in reply to ASCII Rulers

sub ruler {
    my$r=($_[0]+9)/10;"  @{[map{sprintf'%9s'
    ,$_}1..$r]}\n0".1234567890x$r."\n"
}