|
($\={})=~s/(?<=.).+//&&print+(q/J/,\//=~ /..(\S)/&&$1.$2.($^X=~/.+\/(.)/&&uc($1)))
Favourite chess player: Bobby Fischer.
Favourite programming languages: Ruby, Python, Perl.
Favourite MVC: WEB2PY.
|
($\={})=~s/(?<=.).+//&&print+(q/J/,\//=~ /..(\S)/&&$1.$2.($^X=~/.+\/(.)/&&uc($1)))