Perl - need script for modify lines

Shell Programming and Scripting
1

Hello,

does somebody can make script for me, which replace:

(input file)

to

ace;|;
ace;|;
ace;|;

(output file)

2

sed:

 sed 's/\(.*\)/ace;|;\1/' inputfile

awk:

 awk '{print "ace;|;" $0}' inputfile

perl:

3 
sed 's/^/ace;|;/' urfile

awk '$0="ace;|;" $0' urfile

perl -p -e  's/^/ace;|;/' urfile
4

Why does it get error?

 sed 's/^/ace;|;\1/' urfile