[perl]
print 123;
[/perl]