Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re: Swapping a record in a File

by rob_au (Abbot)
on Dec 29, 2003 at 12:37 UTC ( #317417=note: print w/ replies, xml ) Need Help??

in reply to Swaping a record in a File

For this problem, I would consider the use of Tie::File with some code similar to the following:

use Tie::File; tie my @array, 'Tie::File', '' or die $!; for my $index (0 .. $#array) { unshift @array, splice(@array, $index, 1) if $array[$index] =~ /33 +3/; } untie @array;


perl -le "print+unpack'N',pack'B32','00000000000000000000001010100010'"

Comment on Re: Swapping a record in a File
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://317417]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (5)
As of 2015-07-30 01:17 GMT
Find Nodes?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...

    Results (269 votes), past polls