in reply to Help in converting awk in perl

This perl command does the equivalent of your code, on Linux.
Adjust and escape quotes as needed, for windows: 
perl -ne 'push @x, m/(\d+)"$/ }{print join (",",@x),"\n"' out.txt

[download]

             My goal ... to kill off the slow brain cells that are holding me back from synergizing my knowledge of vertically integrated mobile platforms in local cloud-based content management system datafication.

In Section Seekers of Perl Wisdom