home *** CD-ROM | disk | FTP | other *** search
/ Quake 'em / QUAKEEM.BIN / quake / programs / soulswp1 / foo.pl < prev    next >
Encoding:
Perl Script  |  1996-08-24  |  96 b   |  4 lines
  1. #!/usr/bin/perl -n
  2. ($a, $b) = split;
  3. print "$a = other.$b; other.$b = self.$b; self.$b = $a;\n"
  4.