Tokenize split a string in bash using perl

Question

I have a bash shell script.

I know how to tokenize a string in Perl using split function. I know there is a method in Bash as well. I prefer using the Perl function.

How could, if possible, Perl be used in bash to split a string and store in array?

Let's say string = "myaddr@mail.com;my2ndaddr@mail.com"

Do you need a regex to split the string? Or is it just a string, or even just a character? — choroba, Apr 07 '22 at 19:12

glenn jackman · Answer 1 · 2022-04-07T21:23:24.750

2

If you're asking if a perl array can be used in bash: no, that data resides in a different process.

Given:

string="myaddr@mail.com;my2ndaddr@mail.com"

In bash, use

IFS=";" read -ra addresses <<< "$string"

If you really really want to use split in perl, you can do

mapfile -t addresses < <(
    perl -sle 'print for split /;/, $emails' -- -emails="$string"
)

Both solutions result in

$ declare -p addresses
declare -a addresses=([0]="myaddr@mail.com" [1]="my2ndaddr@mail.com")

edited Apr 07 '22 at 21:23

answered Apr 07 '22 at 21:16

glenn jackman

A bit of golf: `perl -pe'y/;/\n/' <<<"$string"` – glenn jackman Apr 07 '22 at 21:20

score 1 · Answer 2 · answered Apr 07 '22 at 19:19

1

You can do something like this

v="myaddr@mail.com;my2ndaddr@mail.com"
IFS=$'\n' a=( $(perl -nE 'say for split /;/' <<< "$v") )

then a contains the email addresses.

As email addresses cannot contain withe-spaces, you can ignore the IFS part (but this is for the more general case).

answered Apr 07 '22 at 19:19

1

That's just a complicated version of `IFS=\; a=( $v )`, right? – ikegami Apr 07 '22 at 20:57
@ikegami right, but as the OP didn't mention what the delimiter could be this leaves room to add a more complex regex instead of just `;` – Diego Torres Milano Apr 07 '22 at 22:11

score 0 · Answer 3 · answered Apr 07 '22 at 19:15

I'm not sure why you would do this, but this comes to mind:

3 Answers3