Skip to content

Instantly share code, notes, and snippets.

@jberger

jberger/data_quine.pl

Created June 16, 2012 14:25
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jberger/2941467 to your computer and use it in GitHub Desktop.
Save jberger/2941467 to your computer and use it in GitHub Desktop.
Download ZIP
A Perl Quine (ab)using DATA
Raw
data_quine.pl
#!/usr/bin/env perl
use strict;
use warnings;
seek DATA, 0, 0;
print while <DATA>;
__DATA__
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment