perl -E"say '.' x rand(80) . '# test comment' for 1..3"
......................# test comment
.................................# test comment
..........................................................................# test comment