#!usr/bin/perl -w use strict; my $x = 'ASDSSDSDDDAAAAEDCDALSOSSKDQWSDSD'; print substr($x,4-1,8-4+1); #strings start at index 0 and not index 1. #prints SSDSD
In reply to Re^3: print and extract the line
by Marshall
in thread print and extract the line
by vis1982
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |