Infrastructure mods

[aoc.git] / lib / Y / AoC / Task.pm

diff --git a/lib/Y/AoC/Task.pm b/lib/Y/AoC/Task.pm
index bab6d938f36fa8413b9db1e4727d126d19a02060..ec7c4a20e2d366817cedd7d56a0e74faeceb4382 100644 (file)
--- a/lib/Y/AoC/Task.pm
+++ b/lib/Y/AoC/Task.pm
@@ -3,6 +3,8 @@ package Y::AoC::Task;
 use v5.36;
 
 use Exporter ('import');
+use IO::Handle;
+
 our @EXPORT = qw(t asay bsay);
 use Y::AoC qw(red white grey yellow day year);
 
@@ -20,10 +22,13 @@ $SIG{__WARN__} = sub($msg) {
        say STDERR $msg;
 };
 
+STDOUT->autoflush(1);
+STDERR->autoflush(1);
+
 our $in_test;
 sub t($subtest = ()) {
        $subtest //= '';
-       $ARGV[0] =~ s/in\.txt/test$subtest.txt/;
+       $ARGV[0] =~ s/in\.txt/test$subtest.txt/ if defined $ARGV[0];
        $in_test = 1;
 }
 
@@ -91,12 +96,3 @@ sub try_submit($part, @msg) {
 }
 
 1;
-__END__
-package Y::AoC::UA;
-
-sub new($class, $year, $day) {
-       eval 'require
-}
-
-sub get($ua) {
-1;