diff options
| -rw-r--r-- | RPM4/lib/RPM4/Header/Changelogs.pm | 3 | ||||
| -rw-r--r-- | RPM4/lib/RPM4/Header/Dependencies.pm | 3 | ||||
| -rw-r--r-- | RPM4/lib/RPM4/Header/Files.pm | 3 |
3 files changed, 9 insertions, 0 deletions
diff --git a/RPM4/lib/RPM4/Header/Changelogs.pm b/RPM4/lib/RPM4/Header/Changelogs.pm index 570d190..37c6287 100644 --- a/RPM4/lib/RPM4/Header/Changelogs.pm +++ b/RPM4/lib/RPM4/Header/Changelogs.pm @@ -18,6 +18,9 @@ package RPM4::Header::Changelogs; +use strict; +use warnings; + sub new { my ($class, $header) = @_; diff --git a/RPM4/lib/RPM4/Header/Dependencies.pm b/RPM4/lib/RPM4/Header/Dependencies.pm index ecdf5af..da809cf 100644 --- a/RPM4/lib/RPM4/Header/Dependencies.pm +++ b/RPM4/lib/RPM4/Header/Dependencies.pm @@ -18,6 +18,9 @@ package RPM4::Header::Dependencies; +use strict; +use warnings; + sub new { my ($class, $deptag, $initdep, @depdesc) = @_; print "$deptag, $initdep\n"; diff --git a/RPM4/lib/RPM4/Header/Files.pm b/RPM4/lib/RPM4/Header/Files.pm index 236d248..a3d9d78 100644 --- a/RPM4/lib/RPM4/Header/Files.pm +++ b/RPM4/lib/RPM4/Header/Files.pm @@ -18,6 +18,9 @@ package RPM4::Header::Files; +use strict; +use warnings; + sub dircount { $_[0]->countdir(); } |