in reply to from $string to shining $string
You can achieve this by setting the variable $/ to '%' before reading in the contents of the file:
local $/ = '%'; my @contents = <FILE>; # each element is the percent separated bit [download]
/J\