java:

String key = "1234567890";

perl:

my $key = "1234567890";

##</code><code>##

java:

byte[] bytes = new byte[256];

##</code><code>##

java:
byte[] kbytes = key.getBytes();