#!/usr/bin/perl open otse, ">stdout"; print otse " Jutukas \n"; print otse " jutukas \n"; close otse; system "java ManyServer 3015"; print "ots";