Could anyone please help me in fixing this error?

Don't feed junk to open?

$ perl -Mautodie -e"open my$in, q!<!, q!echo|! "
Can't open 'echo|' for reading: 'Invalid argument' at -e line 1
[download]

on my operating system, filenames cannot contain |