use strict;
use warnings;
use autodie;

open (my $file, '>', 'result.txt');
print $file `java -jar cmdline-jmxclient-0.10.3.jar - localhost:1100 com.ogs.red5.client.manager:name=Manager getConnectedAgents`;