NAME Perl::LineNumber::Comment - Add line number to Perl source as comment VERSION This document describes version 0.002 of Perl::LineNumber::Comment (from Perl distribution Perl-LineNumber-Comment), released on 2020-11-28. SYNOPSIS In your code: use File::Slurper qw(read_text); use Perl::LineNumber::Comment qw(add_line_number_comments_to_perl_source); my $source = read_text('sample.pl'); print add_line_number_comments_to_perl_source(source => $source); Content of sample.pl: #!/usr/bin/env perl use 5.010001; use strict; use warnings; print "Hello, world 1!"; print "Hello, world 2!"; # a comment print "A multiline string"; print <content). Line three. EOF exit 0; __END__ one two three Output of code: #!/usr/bin/env perl use 5.010001; use strict; use warnings; # line 5 print "Hello, world 1!"; print "Hello, world 2!"; # a comment print "A multiline string"; # line 10 print < any This function is not exported. Arguments ('*' denotes required arguments): * column => *posint* (default: 80) Currently not implemented * every => *posint* (default: 5) * format => *str* (default: " # line %d") * source* => *str* Return value: (any) HOMEPAGE Please visit the project's homepage at . SOURCE Source repository is at . BUGS Please report any bugs or feature requests on the bugtracker website When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature. SEE ALSO AUTHOR perlancar COPYRIGHT AND LICENSE This software is copyright (c) 2020 by perlancar@cpan.org. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.