slightly more idomatic perl
slightly more idomatic perl

this version is slightly more idiomatic, I think.
mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes,mubaris/yes