in reply to Unable to write the .sv file

Please, use the <code>...</code> tags to make your post readable.

What do you mean by "unable to write"? Do you see any errors? Hasn't the file changed? Or are the changes unexpected?

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]

In Section Seekers of Perl Wisdom