Terse Perl

Perl supports a style of coding with very short phrases. For example, many built in functions use the special scalar variable $_ if no other variable is specified. So file reading code…
while ($line = ) {
      print $line;
}
Can be written as…
while () {
      print;
}