use Device; use System; my ( $serverAddress, $port, $reportFile ) = @_; my $System = new System($serverAddress, $port); my $dut = new Device('DEV',127.0.0.1,5000);