X-Git-Url: https://git.proxmox.com/?p=qemu-server.git;a=blobdiff_plain;f=pcitest.pl;h=c87a800da61e89210f19269d41c8c6004146ce19;hp=a354c6886b1a1d7d87f4dd6e600d8dd769c46ef5;hb=d6140280f7ebfbb58efa4c47661b1b216ca01528;hpb=1e3baf05f2b5e795f99f5c4bb7bdb118c72b8b50 diff --git a/pcitest.pl b/pcitest.pl index a354c68..c87a800 100755 --- a/pcitest.pl +++ b/pcitest.pl @@ -1,8 +1,9 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl # this is some experimental code to test pci pass through use strict; +use warnings; use IO::Dir; use IO::File; use Time::HiRes qw(usleep);