如何将数据从Perl传递到Java？

my $data = "Hello, Java!";
system("java MyJavaProgram $data");

public class MyJavaProgram {
    public static void main(String[] args) {
        String data = args[0];
        System.out.println("Data from Perl: " + data);
    }
}

my $data = "Hello, Java!";
open(my $fh, '>', 'data.txt');
print $fh $data;
close($fh);

import java.io.File;
import java.io.IOException;

public class MyJavaProgram {
    public static void main(String[] args) {
        try {
            File dataFile = new File("data.txt");
            String data = new String(Files.readAllBytes(dataFile.toPath()));
            System.out.println("Data from Perl: " + data);
        } catch (IOException e) {
            e.printStackTrace();
        }
    }
}

use IO::Socket::INET;

my $data = "Hello, Java!";
my $socket = IO::Socket::INET->new(PeerAddr => 'localhost', PeerPort => 12345, Proto => 'tcp') or die "Could not create socket: $!\n";
print $socket $data;
close($socket);

import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStreamReader;
import java.net.ServerSocket;
import java.net.Socket;

public class MyJavaProgram {
    public static void main(String[] args) {
        try {
            ServerSocket serverSocket = new ServerSocket(12345);
            Socket socket = serverSocket.accept();
            BufferedReader in = new BufferedReader(new InputStreamReader(socket.getInputStream()));
            String data = in.readLine();
            System.out.println("Data from Perl: " + data);
            in.close();
            socket.close();
            serverSocket.close();
        } catch (IOException e) {
            e.printStackTrace();
        }
    }
}