blob: 49a48f15b78b49a5e679379ac74f9dcf90b23d0e (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
  | 
Obtained from http://perl-users.jp/articles/advent-calendar/2011/test/11
--- lib/Perl/Metrics/Simple/Analysis/File.pm.orig	2021-03-21 15:14:01 UTC
+++ lib/Perl/Metrics/Simple/Analysis/File.pm
@@ -340,6 +340,7 @@ sub _iterate_over_subs {
             name              => $sub->name,
             lines             => $sub_length,
             mccabe_complexity => $self->measure_complexity($sub),
+            line_number       => $sub->line_number,
             };
     }
     return \@subs;
 
  |