$pattern = qr/[:|]/;
@array = split $pattern;

# instead of

$pattern = '[:|]';
@array = split $pattern;