Normally this is done with a regular expression or possibly index (for the position of the substring 'AS'). See perlretut for further explanation of regular expressions. Once you have read the documentation for index and regular expressions, please make a first attempt on you own. If you still can't get it to work as you want, come back, show us what you have done, and we'll be happy to help you sort it out.

Best, beth

Thanks. Will try again and get back, if not possible.

So what code have you written and where do you encounter problems?

This is not a program writing service. This site is about learning and programming Perl. We will help you with your existing code, or with general advice on how to best proceed, but we will neither do your homework nor your pay-work for you.

You will likely want to read perlretut and/or index, depending on how you want to approach this problem.

$ perl -le'
$_ = "ACER ASPIRE SERIES AS1954-526352BN";
print;
s/AS(?=\d)//g;
print;
'
ACER ASPIRE SERIES AS1954-526352BN
ACER ASPIRE SERIES 1954-526352BN
[download]

Thanks a lot, Sir.