You could use IO::Scalar which seems to be part of IO::Stringy.

Below code is from the documentation.

    use IO::Scalar;
    $data = "My message:\n";
     
    ### Open a handle on a string, and append to it:
    $SH = new IO::Scalar \$data;
    print $SH "Hello";    
    print $SH ", world!\nBye now!\n";
    print "The string is now: ", $data, "\n";

    ### Open a handle on a string, read it line-by-line, then close it
+:
    $SH = new IO::Scalar \$data;
    while (<$SH>) {
    print "Got line: $_";
    }
    close $SH;
[download]

Just a tongue-tied, twisted, earth-bound misfit. -- Pink Floyd