programming-examples/perl/Report/Prints a value-field character.pl

#!/usr/local/bin/perl 

format SPECIAL = 
This line contains the special character @. 
"@" 

. 

$~ = "SPECIAL"; 
write;