diff -Nru libnetpacket-perl-1.4.2/Build.PL libnetpacket-perl-1.4.4/Build.PL --- libnetpacket-perl-1.4.2/Build.PL 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/Build.PL 2013-11-30 16:40:29.000000000 +0000 @@ -19,13 +19,14 @@ "Yanick Champoux " ], "dist_name" => "NetPacket", - "dist_version" => "1.4.2", + "dist_version" => "1.4.4", "license" => "artistic_2", "module_name" => "NetPacket", "recommends" => {}, "recursive_test_files" => 1, "requires" => { "constant" => 0, + "perl" => "v5.10.0", "strict" => 0, "vars" => 0, "warnings" => 0 @@ -40,17 +41,18 @@ ); +my %fallback_build_requires = ( + "File::Spec" => 0, + "IO::Handle" => 0, + "IPC::Open3" => 0, + "Module::Build" => "0.3601", + "Test::More" => "0.88" +); + + unless ( eval { Module::Build->VERSION(0.4004) } ) { - my $tr = delete $module_build_args{test_requires}; - my $br = $module_build_args{build_requires}; - for my $mod ( keys %$tr ) { - if ( exists $br->{$mod} ) { - $br->{$mod} = $tr->{$mod} if $tr->{$mod} > $br->{$mod}; - } - else { - $br->{$mod} = $tr->{$mod}; - } - } + delete $module_build_args{test_requires}; + $module_build_args{build_requires} = \%fallback_build_requires; } my $build = Module::Build->new(%module_build_args); diff -Nru libnetpacket-perl-1.4.2/CONTRIBUTORS libnetpacket-perl-1.4.4/CONTRIBUTORS --- libnetpacket-perl-1.4.2/CONTRIBUTORS 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/CONTRIBUTORS 2013-11-30 16:40:29.000000000 +0000 @@ -6,10 +6,13 @@ patches, bug reports, help with troubleshooting, etc. A huge thank to all of them. + * Andreas Schwab * Ben Magistro + * Dinar Valeev * Lubomir Rintel * Neil Bowers * Robin Lee * Stan Schwertly * Stephanie Wehner * Tim Potter + * fschlich diff -Nru libnetpacket-perl-1.4.2/Changes libnetpacket-perl-1.4.4/Changes --- libnetpacket-perl-1.4.2/Changes 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/Changes 2013-11-30 16:40:29.000000000 +0000 @@ -1,5 +1,21 @@ revision history for NetPacket +1.4.4 2013-11-30 + [BUG FIXES] + - NetPacket::USBMon: also handle big endian perl without quad type. + (GH#5, Andreas Schwab) + - Typo fix in comments. (GH#6, fschlich) + + [STATISTICS] + - code churn: 3 files changed, 13 insertions(+), 4 deletions(-) + +1.4.3 2013-10-03 + [BUG FIXES] + - Unpack data in LittleEndian format. (GH#4, k0da) + + [STATISTICS] + - code churn: 3 files changed, 62 insertions(+), 27 deletions(-) + 1.4.2 2013-09-25 [BUG FIXES] - Dist::Zilla::Plugin::Test::Compile was causing test to potentially hang diff -Nru libnetpacket-perl-1.4.2/META.json libnetpacket-perl-1.4.4/META.json --- libnetpacket-perl-1.4.2/META.json 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/META.json 2013-11-30 16:40:29.000000000 +0000 @@ -6,7 +6,7 @@ "Yanick Champoux " ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 4.300037, CPAN::Meta::Converter version 2.120921", + "generated_by" : "Dist::Zilla version 5.006, CPAN::Meta::Converter version 2.120921", "license" : [ "artistic_2" ], @@ -34,6 +34,7 @@ "runtime" : { "requires" : { "constant" : "0", + "perl" : "v5.10.0", "strict" : "0", "vars" : "0", "warnings" : "0" @@ -51,39 +52,39 @@ "provides" : { "NetPacket" : { "file" : "lib/NetPacket.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" }, "NetPacket::ARP" : { "file" : "lib/NetPacket/ARP.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" }, "NetPacket::Ethernet" : { "file" : "lib/NetPacket/Ethernet.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" }, "NetPacket::ICMP" : { "file" : "lib/NetPacket/ICMP.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" }, "NetPacket::IGMP" : { "file" : "lib/NetPacket/IGMP.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" }, "NetPacket::IP" : { "file" : "lib/NetPacket/IP.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" }, "NetPacket::TCP" : { "file" : "lib/NetPacket/TCP.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" }, "NetPacket::UDP" : { "file" : "lib/NetPacket/UDP.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" }, "NetPacket::USBMon" : { "file" : "lib/NetPacket/USBMon.pm", - "version" : "v1.4.2" + "version" : "v1.4.4" } }, "release_status" : "stable", @@ -99,16 +100,19 @@ "web" : "https://github.com/yanick/netpacket" } }, - "version" : "1.4.2", + "version" : "1.4.4", "x_authority" : "cpan:YANICK", "x_contributors" : [ + "Andreas Schwab ", "Ben Magistro ", + "Dinar Valeev ", "Lubomir Rintel ", "Neil Bowers ", "Robin Lee ", "Stan Schwertly ", "Stephanie Wehner ", - "Tim Potter " + "Tim Potter ", + "fschlich " ] } diff -Nru libnetpacket-perl-1.4.2/META.yml libnetpacket-perl-1.4.4/META.yml --- libnetpacket-perl-1.4.2/META.yml 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/META.yml 2013-11-30 16:40:29.000000000 +0000 @@ -13,7 +13,7 @@ configure_requires: Module::Build: 0.3601 dynamic_config: 0 -generated_by: 'Dist::Zilla version 4.300037, CPAN::Meta::Converter version 2.120921' +generated_by: 'Dist::Zilla version 5.006, CPAN::Meta::Converter version 2.120921' license: artistic_2 meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -22,33 +22,34 @@ provides: NetPacket: file: lib/NetPacket.pm - version: v1.4.2 + version: v1.4.4 NetPacket::ARP: file: lib/NetPacket/ARP.pm - version: v1.4.2 + version: v1.4.4 NetPacket::Ethernet: file: lib/NetPacket/Ethernet.pm - version: v1.4.2 + version: v1.4.4 NetPacket::ICMP: file: lib/NetPacket/ICMP.pm - version: v1.4.2 + version: v1.4.4 NetPacket::IGMP: file: lib/NetPacket/IGMP.pm - version: v1.4.2 + version: v1.4.4 NetPacket::IP: file: lib/NetPacket/IP.pm - version: v1.4.2 + version: v1.4.4 NetPacket::TCP: file: lib/NetPacket/TCP.pm - version: v1.4.2 + version: v1.4.4 NetPacket::UDP: file: lib/NetPacket/UDP.pm - version: v1.4.2 + version: v1.4.4 NetPacket::USBMon: file: lib/NetPacket/USBMon.pm - version: v1.4.2 + version: v1.4.4 requires: constant: 0 + perl: v5.10.0 strict: 0 vars: 0 warnings: 0 @@ -56,13 +57,16 @@ bugtracker: http://rt.cpan.org/Public/Dist/Display.html?Name=NetPacket homepage: http://search.cpan.org/dist/NetPacket/ repository: https://github.com/yanick/netpacket.git -version: 1.4.2 +version: 1.4.4 x_authority: cpan:YANICK x_contributors: + - 'Andreas Schwab ' - 'Ben Magistro ' + - 'Dinar Valeev ' - 'Lubomir Rintel ' - 'Neil Bowers ' - 'Robin Lee ' - 'Stan Schwertly ' - 'Stephanie Wehner ' - 'Tim Potter ' + - 'fschlich ' diff -Nru libnetpacket-perl-1.4.2/README libnetpacket-perl-1.4.4/README --- libnetpacket-perl-1.4.2/README 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/README 2013-11-30 16:40:29.000000000 +0000 @@ -2,7 +2,7 @@ NetPacket - assemble/disassemble network packets at the protocol level VERSION - version 1.4.2 + version 1.4.4 SYNOPSIS # NetPacket is a base class only diff -Nru libnetpacket-perl-1.4.2/README.mkdn libnetpacket-perl-1.4.4/README.mkdn --- libnetpacket-perl-1.4.2/README.mkdn 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/README.mkdn 2013-11-30 16:40:29.000000000 +0000 @@ -4,7 +4,7 @@ # VERSION -version 1.4.2 +version 1.4.4 # SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/SIGNATURE libnetpacket-perl-1.4.4/SIGNATURE --- libnetpacket-perl-1.4.2/SIGNATURE 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/SIGNATURE 2013-11-30 16:40:29.000000000 +0000 @@ -14,27 +14,27 @@ -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 -SHA1 ddb72d4c548832c24086034638cacc29d52288e5 Build.PL -SHA1 08c6d193cfbf3014b3a04c8957de16a4804bfeec CONTRIBUTORS -SHA1 cf4a39aba4fdc93ac801875344d7bafe9f738a94 Changes +SHA1 857e8c0ea113d04621a7a6527e58a6c66ef10f48 Build.PL +SHA1 9588ce60514e59a6d78f58516ce593c8a9b1b7e5 CONTRIBUTORS +SHA1 f01054284913c9dedd69e5e47c0a609e6a20f826 Changes SHA1 29b0b7b9d088441a05d8786d0dc4bb3bd558d205 INSTALL SHA1 c2cbad0911cac62d6016e01230686f431b8e8e79 LICENSE SHA1 af5b779acd642a12e7e5d7eb2a76278239fdada8 MANIFEST -SHA1 29f670930bfc0c2e2d1d90a8e5d6d8d014ecf3c0 META.json -SHA1 818d27323deaf8ceed3e61e7045301a2e09acc97 META.yml -SHA1 efdbcec59d79045ba6e5606ec531da7bb750653d README -SHA1 391be1fd95a92a40a9c78a84d01a3b8d22e3a11b README.mkdn -SHA1 630c0af7d4caeadd9dc932af5b666eaf637bdef3 lib/NetPacket.pm -SHA1 b832c422934e08cfcdd61e327aa4fb9c4106b666 lib/NetPacket/ARP.pm -SHA1 b321650b23144c75106d3609225452c5d342224d lib/NetPacket/Ethernet.pm -SHA1 501c7c24d57510442ac8acfeb78b47d4d39b1d19 lib/NetPacket/ICMP.pm -SHA1 eea24c7bba20a022aa87b3cc122032ad3155cac0 lib/NetPacket/IGMP.pm -SHA1 c14656f2c706f325669e598a879bcae225c4dc47 lib/NetPacket/IP.pm -SHA1 40c2f9196cb087787927d249fca8fc85342578e5 lib/NetPacket/TCP.pm -SHA1 0df51585f48562d5fb834cafe5d8c23f32728ec3 lib/NetPacket/UDP.pm -SHA1 14f184140f796371f18a4d8060371900da594b93 lib/NetPacket/USBMon.pm +SHA1 67c3cf214f0aebfaa5207981bf38ed32d3d407c1 META.json +SHA1 90d2ab84f7a55f5d0c7d850f595401d4b77e00bb META.yml +SHA1 c5828e5b1bf3d202839a073743d1903fc42057b7 README +SHA1 1860657046de1bd499fdcb0f67e701f59baa6d05 README.mkdn +SHA1 ddbd5869d54649dd6aee5b1ee069fe7091563243 lib/NetPacket.pm +SHA1 dd78f2e47a04f6f5dced6a569380ce27e7be7460 lib/NetPacket/ARP.pm +SHA1 cf5b95b2466935e99dc9be6e3529a809863ed7ab lib/NetPacket/Ethernet.pm +SHA1 64806c43c1504d1749789c2394b974e60fff570c lib/NetPacket/ICMP.pm +SHA1 5addcd968d9de290375a67fa3d5f551c0fb195c3 lib/NetPacket/IGMP.pm +SHA1 aec2304da86ff502df844617cd1acdf9772eef6b lib/NetPacket/IP.pm +SHA1 047e218134c55c29dbcfc0954d1a77de97a3cf72 lib/NetPacket/TCP.pm +SHA1 1aa5c49b6855bb2978e364a4d43bca14b521804a lib/NetPacket/UDP.pm +SHA1 97d24a2aeddc5652863f4b9e526c5ea89aacf36e lib/NetPacket/USBMon.pm SHA1 c3fec81fac85eb3cdc17d46b6185123bf1839714 t/00-compile.t -SHA1 e546e4fa1eaf515173636be6723fc09726dddf79 t/000-report-versions-tiny.t +SHA1 49caa1fc3e93c71dbd13407526a79c33a3869c6b t/000-report-versions-tiny.t SHA1 2f95a288a42eed0173859c5bb9d37caee7e4b26b t/bug-37931.t SHA1 721a206d861139f8f73081b8d337bfcdce4247e5 t/checksum.t SHA1 45f23540d419a608363a53ed11b81c589866406e t/ethernet.t @@ -47,9 +47,9 @@ SHA1 35bfbabbd32ddf83a0ac49db63f69de9ff6eadb2 t/udp.t SHA1 86e62e4a5bceec942b536d2b29f7910f883c6387 t/usbmon.t -----BEGIN PGP SIGNATURE----- -Version: GnuPG v1.4.11 (GNU/Linux) +Version: GnuPG v1.4.14 (GNU/Linux) -iEYEARECAAYFAlJDZ7sACgkQ34Hwf+GwC4zCGgCg6xToaRY0U9uZ5jbM8M2ksIxS -Wy0An1riOfb6ladYHkAyKq/sPCHIXDmi -=BI6N +iEYEARECAAYFAlKaFPoACgkQ34Hwf+GwC4yLXQCfW++zXuQrXWUmK/eMiMBPKVvw +7X8AoMSxss7UInp1yWod1ezGpRceqdpQ +=6BTU -----END PGP SIGNATURE----- diff -Nru libnetpacket-perl-1.4.2/debian/changelog libnetpacket-perl-1.4.4/debian/changelog --- libnetpacket-perl-1.4.2/debian/changelog 2013-11-29 20:31:52.000000000 +0000 +++ libnetpacket-perl-1.4.4/debian/changelog 2013-12-04 22:49:24.000000000 +0000 @@ -1,3 +1,10 @@ +libnetpacket-perl (1.4.4-1) unstable; urgency=low + + * Import Upstream version 1.4.4 + * Drop spelling.patch, whatis.patch: both applied upstream + + -- Florian Schlichting Wed, 04 Dec 2013 23:49:19 +0100 + libnetpacket-perl (1.4.2-1) unstable; urgency=low [ Salvatore Bonaccorso ] diff -Nru libnetpacket-perl-1.4.2/debian/patches/series libnetpacket-perl-1.4.4/debian/patches/series --- libnetpacket-perl-1.4.2/debian/patches/series 2013-11-29 20:31:37.000000000 +0000 +++ libnetpacket-perl-1.4.4/debian/patches/series 1970-01-01 00:00:00.000000000 +0000 @@ -1,2 +0,0 @@ -spelling.patch -whatis.patch diff -Nru libnetpacket-perl-1.4.2/debian/patches/spelling.patch libnetpacket-perl-1.4.4/debian/patches/spelling.patch --- libnetpacket-perl-1.4.2/debian/patches/spelling.patch 2013-11-29 20:12:26.000000000 +0000 +++ libnetpacket-perl-1.4.4/debian/patches/spelling.patch 1970-01-01 00:00:00.000000000 +0000 @@ -1,17 +0,0 @@ -Author: gregor herrmann -Description: spelling fix -Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=91063 -Reviewed-by: Nicholas Bamber -Last-Update: 2011-03-18 - ---- a/lib/NetPacket/UDP.pm -+++ b/lib/NetPacket/UDP.pm -@@ -321,7 +321,7 @@ - # replace foo in the payload with bar - $udp_obj->{data} =~ s/foo/bar/g; - -- # reencode the packet -+ # re-encode the packet - $ip_obj->{data} = $udp_obj->encode($udp_obj, $ip_obj); - $data = $ip_obj->encode; - diff -Nru libnetpacket-perl-1.4.2/debian/patches/whatis.patch libnetpacket-perl-1.4.4/debian/patches/whatis.patch --- libnetpacket-perl-1.4.2/debian/patches/whatis.patch 2013-11-29 20:31:37.000000000 +0000 +++ libnetpacket-perl-1.4.4/debian/patches/whatis.patch 1970-01-01 00:00:00.000000000 +0000 @@ -1,15 +0,0 @@ -Description: add WHATIS entry to USBMon.pm's NAME section -Author: Florian Schlichting -Forwarded: https://github.com/yanick/netpacket/commit/fe66bbd6ab02bca8b95b91c307a6c3717d40b670 - ---- a/lib/NetPacket/USBMon.pm -+++ b/lib/NetPacket/USBMon.pm -@@ -147,7 +147,7 @@ - - =head1 NAME - --NetPacket::USBMon -+NetPacket::USBMon - Assemble and disassemble USB packets captured via Linux USBMon interface. - - =head1 VERSION - diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket/ARP.pm libnetpacket-perl-1.4.4/lib/NetPacket/ARP.pm --- libnetpacket-perl-1.4.2/lib/NetPacket/ARP.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket/ARP.pm 2013-11-30 16:40:29.000000000 +0000 @@ -3,7 +3,7 @@ $NetPacket::ARP::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::ARP::VERSION = '1.4.2'; + $NetPacket::ARP::VERSION = '1.4.4'; } # ABSTRACT: Assemble and disassemble ARP (Address Resolution Protocol) packets. @@ -112,7 +112,7 @@ =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket/Ethernet.pm libnetpacket-perl-1.4.4/lib/NetPacket/Ethernet.pm --- libnetpacket-perl-1.4.2/lib/NetPacket/Ethernet.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket/Ethernet.pm 2013-11-30 16:40:29.000000000 +0000 @@ -3,7 +3,7 @@ $NetPacket::Ethernet::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::Ethernet::VERSION = '1.4.2'; + $NetPacket::Ethernet::VERSION = '1.4.4'; } # ABSTRACT: Assemble and disassemble ethernet packets. @@ -149,7 +149,7 @@ =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket/ICMP.pm libnetpacket-perl-1.4.4/lib/NetPacket/ICMP.pm --- libnetpacket-perl-1.4.2/lib/NetPacket/ICMP.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket/ICMP.pm 2013-11-30 16:40:29.000000000 +0000 @@ -3,7 +3,7 @@ $NetPacket::ICMP::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::ICMP::VERSION = '1.4.2'; + $NetPacket::ICMP::VERSION = '1.4.4'; } # ABSTRACT: Assemble and disassemble ICMP (Internet Control Message Protocol) packets. @@ -156,7 +156,7 @@ =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket/IGMP.pm libnetpacket-perl-1.4.4/lib/NetPacket/IGMP.pm --- libnetpacket-perl-1.4.2/lib/NetPacket/IGMP.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket/IGMP.pm 2013-11-30 16:40:29.000000000 +0000 @@ -7,7 +7,7 @@ $NetPacket::IGMP::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::IGMP::VERSION = '1.4.2'; + $NetPacket::IGMP::VERSION = '1.4.4'; } # ABSTRACT: Assemble and disassemble IGMP (Internet Group Mangement Protocol) packets. @@ -154,7 +154,7 @@ =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket/IP.pm libnetpacket-perl-1.4.4/lib/NetPacket/IP.pm --- libnetpacket-perl-1.4.2/lib/NetPacket/IP.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket/IP.pm 2013-11-30 16:40:29.000000000 +0000 @@ -8,7 +8,7 @@ $NetPacket::IP::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::IP::VERSION = '1.4.2'; + $NetPacket::IP::VERSION = '1.4.4'; } # ABSTRACT: Assemble and disassemble IP (Internet Protocol) packets. @@ -221,7 +221,7 @@ =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket/TCP.pm libnetpacket-perl-1.4.4/lib/NetPacket/TCP.pm --- libnetpacket-perl-1.4.2/lib/NetPacket/TCP.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket/TCP.pm 2013-11-30 16:40:29.000000000 +0000 @@ -9,7 +9,7 @@ $NetPacket::TCP::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::TCP::VERSION = '1.4.2'; + $NetPacket::TCP::VERSION = '1.4.4'; } # ABSTRACT: Assemble and disassemble TCP (Transmission Control Protocol) packets. @@ -302,7 +302,7 @@ =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket/UDP.pm libnetpacket-perl-1.4.4/lib/NetPacket/UDP.pm --- libnetpacket-perl-1.4.2/lib/NetPacket/UDP.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket/UDP.pm 2013-11-30 16:40:29.000000000 +0000 @@ -7,7 +7,7 @@ $NetPacket::UDP::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::UDP::VERSION = '1.4.2'; + $NetPacket::UDP::VERSION = '1.4.4'; } # ABSTRACT: Assemble and disassemble UDP (User Datagram Protocol) packets. @@ -140,7 +140,7 @@ =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS @@ -321,7 +321,7 @@ # replace foo in the payload with bar $udp_obj->{data} =~ s/foo/bar/g; - # reencode the packet + # re-encode the packet $ip_obj->{data} = $udp_obj->encode($udp_obj, $ip_obj); $data = $ip_obj->encode; diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket/USBMon.pm libnetpacket-perl-1.4.4/lib/NetPacket/USBMon.pm --- libnetpacket-perl-1.4.2/lib/NetPacket/USBMon.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket/USBMon.pm 2013-11-30 16:40:29.000000000 +0000 @@ -3,8 +3,11 @@ $NetPacket::USBMon::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::USBMon::VERSION = '1.4.2'; + $NetPacket::USBMon::VERSION = '1.4.4'; } +#ABSTRACT: Assemble and disassemble USB packets captured via Linux USBMon interface. + +use 5.10.0; use strict; use vars qw(@ISA @EXPORT_OK %EXPORT_TAGS); @@ -65,18 +68,18 @@ my($id, $type, $xfer_type, $epnum, $devnum, $busnum, $flag_setup, $flag_data, $ts_sec, $ts_usec, $status, $length, $len_cap, $s, $interval, $start_frame, $xfer_flags, $ndesc, $rest) = - unpack('a8CCCCSCCa8liIIa8llLLa*', $packet); + unpack('a8CCCCS{bmRequestType} & USB_TYPE_VENDOR) { ($setup->{wValue}, $setup->{wIndex}, - $setup->{wLength}) = unpack('S3', $rest); + $setup->{wLength}) = unpack('S<3', $rest); } else { # Unknown setup request; $setup->{data} = $rest; @@ -127,7 +130,7 @@ # Isochronous descriptors if ($self->{xfer_type} == USB_XFER_TYPE_ISO) { my $iso = {}; - ($iso->{error_count}, $iso->{numdesc}) = unpack('ii', $s); + ($iso->{error_count}, $iso->{numdesc}) = unpack('i{iso} = $iso; } @@ -147,11 +150,11 @@ =head1 NAME -NetPacket::USBMon +NetPacket::USBMon - Assemble and disassemble USB packets captured via Linux USBMon interface. =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/lib/NetPacket.pm libnetpacket-perl-1.4.4/lib/NetPacket.pm --- libnetpacket-perl-1.4.2/lib/NetPacket.pm 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/lib/NetPacket.pm 2013-11-30 16:40:29.000000000 +0000 @@ -9,7 +9,7 @@ $NetPacket::AUTHORITY = 'cpan:YANICK'; } { - $NetPacket::VERSION = '1.4.2'; + $NetPacket::VERSION = '1.4.4'; } # ABSTRACT: assemble/disassemble network packets at the protocol level @@ -117,7 +117,7 @@ =head1 VERSION -version 1.4.2 +version 1.4.4 =head1 SYNOPSIS diff -Nru libnetpacket-perl-1.4.2/t/000-report-versions-tiny.t libnetpacket-perl-1.4.4/t/000-report-versions-tiny.t --- libnetpacket-perl-1.4.2/t/000-report-versions-tiny.t 2013-09-25 22:46:21.000000000 +0000 +++ libnetpacket-perl-1.4.4/t/000-report-versions-tiny.t 2013-11-30 16:40:29.000000000 +0000 @@ -13,7 +13,7 @@ eval { # no excuses! # report our Perl details - my $want = "any version"; + my $want = 'v5.10.0'; $v .= "perl: $] (wanted $want) on $^O from $^X\n\n"; }; defined($@) and diag("$@");