Re: How to remove underscore before every dot using perl?


We don't bite newbies here... much
	PerlMonks

by madtoperl (Hermit)

on Mar 16, 2017 at 09:50 UTC ( #1184854=note: print w/replies, xml )

Need Help??

Hi finddata,
You can try this for your current input data assuming only one _ is there,

#!/usr/local/bin/perl
use strict;
use warnings;

my $str = 'DEMO_.perl';
$str =~ s/\_//;
print $str;
[download]

Comment on Re: How to remove underscore before every dot using perl? Download Code

Log In^?

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://1184854]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others cooling their heels in the Monastery: (3)

As of 2023-12-10 06:50 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?