Ideone.com

download

copy

#!/bin/bash
 
for s in abcdefghijklmnop _test_ 123abc A_b1C_23 _! magical\ pony1; do
	echo -n "$s" | perl -pe '$_=!/\W|^\d//2**/^_/'
	echo
done

Success #stdin #stdout 0s 5992KB

stdin

copy

Standard input is empty

stdout

copy

https://ideone.com/7JreBb

language:

Bash (bash 5.0.3)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

Widget for compiling and running the source code in a web browser!