Testing Java code

[drawde83]

Hi, I'm a bit of a perl newbie but heres my problem. for an assignment in java I have to test a program to see how well it runs. I have to run it with 10000, 20000, 30000 and 40000 random numbers. I have to do each of those setups five times and then graph the medians. I know I can use bash to store the results, I could use bash to find the median but I probably know perl a little better and then I'll graph it in gnuplot. What I want to know is there a way to call the java program from perl itself since it would be easier than reading it in from a file. also any tips to make this easier would be appreciated :-)

[herveus]

Howdy!

You can run an external command using system (if you don't need to capture the output) or backticks (``) or qx// if you do need to capture the output. It looks like you probably want to use backticks or qx//:

my $output = qx/java .../;

Update: If you capture the output in an array, you get a list of lines instead of one big string...

[Skeeve]

And don't forget that you can also use open to start external programs:

open($javain, "java ... |") or die "....";
while (<$javain>) {
  #receive the output
}
close($javain);
#
# or
#
open($javaout, "| java ...") or die "....";
foreach (@inputline) {
  print $javaout $_;
  #send some input
}
close($$javaout);

Key thing is the pipe "|".

[drawde83]

ok I've tried out those methods but when I run the line

 my $output = qx/java MyProgram 50000/

it outputs the time for that the process runs to the screen but I can't retrieve it

[mpeters]

Just to offer a completely different solution... You can invoke Java code (classes) directly from perl using Inline::Java.

[Knom]

Try appending a ' 2>&1' to your command. This tells the shell to redirect the output of `time` (STDERR) to STDOUT instead. Good luck!

[rvosa]

The CPAN module Java is neat. You start up a JavaServer, and if your Java program is in your CLASSPATH you can instantiate objects from its classes and make method calls, so conceivably you could do the operation you want to do, while timing it using benchmark.

2005-10-02 Retitled by planetscape, as per Monastery guidelines
Original title: 'Re:'