Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

Re: in memory files in 5.6.1

by Anonymous Monk
on Aug 22, 2007 at 18:02 UTC ( #634455=note: print w/replies, xml ) Need Help??

in reply to in memory files in 5.6.1

Helpful use: in this example i wanted to open an in-memory file so i could make use of Perl's: format & write operations. This will print a formatted line into a "in mem" file and return it as a scalar string to the calling function. It was a easy way of making a formatted (aligned) toString() for my class. Enjoy.

sub toString { my $self = shift; my $thishash = $self->{_listofkeys}; my $memfile; open (FORMATTED_OUT, '>',\$memfile) || warn "unable to open mem +ory file!"; format FORMATTED_OUT = IMEI BrandName Model OS + Registered To ============================================================== +============================================ @<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<< @<<<< +<<<<<<<<<<<<<< @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< $thishash->{IMEI}, $thishash->{PhoneBrandName}, $thishash->{Ph +oneModel}, $thishash->{PhoneOS}, $thishash->{RegisteredTo} . write FORMATTED_OUT ; close (FORMATTED_OUT); return $memfile; }

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://634455]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (5)
As of 2018-03-20 21:45 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (259 votes). Check out past polls.