my $bla = "Name1%09Name2%2509Name3%252509Name4%25252509";

my @array = split(/\%\d*?09/,$bla);

foreach(@array) {
   print $_."\n";
}