in reply to Re: text file validation
in thread text file validation

hi monks
thanks for your piece of code..

$message = #22 2006-05-02 12:12:35 hjjjdddddd Advisory.No action required. event-101 severe is the name of the alarm but the way it is dispalyed cannot be digested at all 12121212121122
substr( $message,0,160 );

the above code truncates to 140 characters and display them instead of displaying 160 characters

kindly help me out and also tell me a way to display only the first 160 characters

thanks
lax

Replies are listed 'Best First'.
Re^3: text file validation
by marto (Cardinal) on Jul 21, 2006 at 13:58 UTC
    lax,

    Using the following code and your string I get 160 characters output:
    #!/usr/bin/perl use strict; use warnings; my $string="#22 2006-05-02 12:12:35 hjjjdddddd Advisory.No action requ +ired. event-101 severe is the name of the alarm but the way it is dis +palyed cannot be digested at all 12121212121122"; print substr($string,0,160); <code> Output: <code> #22 2006-05-02 12:12:35 hjjjdddddd Advisory.No action required. event- +101 severe is the name of the alarm but the way it is dispalyed canno +t be digested at all
    Can you please post the complete code you are using?

    Update: Fixed typo, print substr($string,0,16); changed to print substr($string,0,160);

    Martin