Since I wouldn't know Java from Coffee, and you didn't tell me what the code should do, I'm gonna pretend it takes a string of 128 characters and returns an array of 64 2-character strings:

use warnings;
use strict;
use Data::Dumper;

my $str = 'deadbeef';
my @bytes = $str =~ /../g;
print Dumper(\@bytes);

__END__

$VAR1 = [
          'de',
          'ad',
          'be',
          'ef'
        ];
[download]

If you are interested in learning Perl, here are some free-sources (I just made that up, I think):

• perlintro
• perlre
• print
• Data::Dumper