Outputs:#!/usr/bin/perl use strict; use warnings; my $mycnt; while(<DATA>){ s!Number this.!++$mycnt.') Number this.'!ie; print; } __DATA__ Sample text. Number this. Number this. Sample text. Number this.
Is there any option in perl to change the counter to print alphabets, e.g. required output isSample text. 1) Number this. 2) Number this. Sample text. 3) Number this.
Thanks in advanceSample text. a) Number this. b) Number this. Sample text. c) Number this. ...
In reply to alpha counter by texuser74
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |