my $stringBeingAFile = "This is the contents of the stringy file\n";
open my $inFile, '<', \$stringBeingAFile;