Hi

I am new to perl 

Can any one please give the scripting for appending line numbers for the code 
lines 


For example:

/* requesting for the script
 * for printing line number */

Fun_script()
{
 Int a; /* local parameter */
 Int b; /* local parameter */
 
/* adding the 
   Two numbers */
   Int c = a+b;

 }/* function end */


Output should be:

/* requesting for the script
 * for printing line number */

1 Fun_script()
2 {
3  Int a; /* local parameter */
4  Int b; /* local parameter */
 
        /* adding the 
           Two numbers */
5   Int c = a+b;

 6}/* function end */


Thanks and regards
chandu


DISCLAIMER:
-----------------------------------------------------------------------------------------------------------------------

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only.
It shall not attach any liability on the originator or HCL or its affiliates. 
Any views or opinions presented in 
this email are solely those of the author and may not necessarily reflect the 
opinions of HCL or its affiliates.
Any form of reproduction, dissemination, copying, disclosure, modification, 
distribution and / or publication of 
this message without the prior written consent of the author of this e-mail is 
strictly prohibited. If you have
received this email in error please delete it and notify the sender 
immediately. Before opening any mail and 
attachments please check them for viruses and defect.

-----------------------------------------------------------------------------------------------------------------------

Reply via email to