all tasks

Task/Singleton/Perl-6/singleton.pl6

@@ -0,0 +1,6 @@
+class Singleton {
+    # We create a lexical variable in the class block that holds our single instance.
+    my Singleton $instance = Singleton.bless(*); # You can add initialization arguments here.
+    method new {!!!} # Singleton.new dies.
+    method instance { $instance; }
+}