Running tshark in perl script

Question

I am trying to run tshark in a perl script, simply by doing the following -

my $filter = "port 68 or 67";
my $capture = "tshark -i eth0 -f $filter -a duration:120 -w pcapture.pcap&";
system($capture);

This code is not starting the tshark process. Any changes recommended?

what error code do you get from `system`? – Sobrique May 05 '15 at 18:35 — Sobrique, May 05 '15 at 18:35

score 0 · Answer 1 · answered May 05 '15 at 18:45

Assuming port 68 or 67 is a legal value for -f, you need quotes to treat it as one entity (a value which contains whitespace):

my $filter = "port 68 or 67";
my $capture = "tshark -i eth0 -f '$filter' -a duration:120 -w pcapture.pcap&";
system($capture);

1 Answers1