gistfile1.pl

use v6;

class Entry {
    has $.filename;
    has $.text;

    method generate {
	my $fh = open $!filename, :w;
	$fh.print($!text);
	$fh.close;
    }
}

my $blogpost = Entry.new(
    filename => "blog.txt",
    text     => "today I wrote my first perl 6 program.\n",
    );

$blogpost.generate;