Sorry for the inconvenience, I want the exact opml text from the file in my string like this:
<?xml version="1.0" encoding="ISO-8859-1"?> <opml version="2.0"> <head> <title>workspace.userlandsamples.doSomeUpstreaming</title> <dateCreated>Mon, 11 Feb 2002 22:48:02 GMT</dateCreated> <dateModified>Sun, 30 Oct 2005 03:30:17 GMT</dateModified> <ownerName>Dave Winer</ownerName> <ownerEmail>dwiner@yahoo.com</ownerEmail> <expansionState>1, 2, 4</expansionState> <vertScrollState>1</vertScrollState> <windowTop>74</windowTop> <windowLeft>41</windowLeft> <windowBottom>314</windowBottom> <windowRight>475</windowRight> </head> <body> <outline text="Changes" isComment="true"> <outline text="1/3/02; 4:54:25 PM by DW"> <outline text="Change "playlist" to "ra +dio"."/> </outline> <outline text="2/12/01; 1:49:33 PM by DW" isComment="true" +> <outline text="Test upstreaming by sprinkling a few fi +les in a nice new test folder."/> </outline> </outline> <outline text="on writetestfile (f, size)"> <outline text="file.surefilepath (f)" isBreakpoint="true"/ +> <outline text="file.writewholefile (f, string.filledstring + ("x", size))"/> </outline> <outline text="local (folder = user.radio.prefs.wwwfolder + &q +uot;test\\largefiles\\")"/> <outline text="for ch = 'a' to 'z'"> <outline text="writetestfile (folder + ch + ".html&qu +ot;, random (1000, 16000))"/> </outline> </body> </opml>
use my perl code print out in console I got:
it seems like a encoding problem, which I have no experience. So I wonder, how do I read such a file and properly stored in a perl string? This is a homework. Am not allow to use any module.<opml ve</opml>2</body>e</outline>ext="writetestfile (folder + ch + &q +uot;.html", random (1000, 16000))"/>lder."/>
In reply to Re^2: *.opml file output to console problem
by Anonymous Monk
in thread *.opml file output to console problem
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |