I wondered how a plain regex would fare. Probably not enough in it to be significant. 
#!/usr/bin/perl
use strict;
use warnings;
use Benchmark qw(:all) ;

# Set up an array of data to test
my $data = '0906928472847292INR~UTRIR8709990166~     700000~INR~200806
+23~RC425484~IFSCSEND001                       ~Remiter Details ~10000
+07   ~TEST RTGS TRF7                     ~                           
+        ~                                   ~ ~RTGS~REVOSN OIL CORPOR
+ATION   ~IOCL  ~09065010889~0906501088900122INR~         7~         1
+~ 1';
my @data;
push @data, $data for 1 .. 1000;

cmpthese(
    1000, 
    {
        'Full split'      => sub {my @refnos; for (@data){my @splitted
+ = split(/~/,$_);   push(@refnos,$splitted[1]);}},
        'Limited split'   => sub {my @refnos; for (@data){my @splitted
+ = split(/~/,$_,3); push(@refnos,$splitted[1]);}},
        'Optimized split' => sub {my @refnos; for (@data){push @refnos
+, (split(/~/,$_,3))[1];}},
        'regex'           => sub {my @refnos; for (@data){push @refnos
+, /~([^~]+)~/;}},
    }
);

[download]
                  Rate    Full split Limited split Optimized split    
+     regex
Full split      23.3/s            --          -81%            -90%    
+      -91%
Limited split    120/s          413%            --            -51%    
+      -54%
Optimized split  244/s          946%          104%              --    
+       -7%
regex            262/s         1024%          119%              7%    
+        --

[download]

In reply to Re^2: Needed Performance improvement in reading and fetching from a file by wfsp
in thread Needed Performance improvement in reading and fetching from a file by harishnuti

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.