summaryrefslogtreecommitdiff
path: root/frontends/scripts
diff options
context:
space:
mode:
authorPaul Buetow <paul@buetow.org>2023-07-27 23:30:19 +0300
committerPaul Buetow <paul@buetow.org>2023-07-27 23:30:19 +0300
commit52a20b00f26c1f8d3e695b3af6ccf47a3198d7d8 (patch)
tree1474b06f797a05e9aa72d0cd9a8722e5a2486563 /frontends/scripts
parent7d053aa8e0ea92fdbdbded609b39f42abea37b08 (diff)
remove habit
Diffstat (limited to 'frontends/scripts')
-rw-r--r--frontends/scripts/habit.pl57
1 files changed, 0 insertions, 57 deletions
diff --git a/frontends/scripts/habit.pl b/frontends/scripts/habit.pl
deleted file mode 100644
index c8ca2e8..0000000
--- a/frontends/scripts/habit.pl
+++ /dev/null
@@ -1,57 +0,0 @@
-#!/usr/bin/perl -T
-
-use v5.36;
-use strict;
-use warnings;
-
-use Acme::Cow;
-
-our @habits = (
- '1h+ deep work',
- 'Breathing exercise',
- 'Do nothing',
- 'Do pistol squads',
- 'Do Push-ups',
- 'Do Shoulder stand',
- 'Do single-arm push-ups',
- 'Do Yoga Bridge',
- 'Do Yoga Cro',
- 'Do Yoga Downward Facing Dog',
- 'Do Yoga Half Moon',
- 'Do Yoga Warrior 3',
- 'Do Yoga Wheel',
- 'Drink tea (or an infusion)',
- 'Drink water',
- 'Eat 99% dark chocolate',
- 'Enjoy my current task',
- 'Focus on things I have under control',
- 'Got enough vitamins?',
- 'Have a positive attitute - Be solution oriented',
- 'Watch bulgarian TV or YouTube',
- 'Have a walk without headphones plugged in',
- 'Help someone',
- 'It\'s family time',
- 'Learn/try out a new Linux/Unix command',
- 'Learn vocs with Anki',
- 'Limit the use of social media',
- 'Listen to a random 101 chapter today',
- 'Listen to music',
- 'Meditate',
- 'Only use my phone and computers intentionally',
- 'Play with the cat',
- 'Process my last (book) notes',
- 'Read my Gemini subscriptions',
- "Read today's chapter of the daily stoic",
- 'Revisit my core values',
- 'Take it easy - nobody is dying!',
- 'Think about the purpose of what I am doing',
- 'Tonight, disconnect from work completely',
- 'Write down 10 ideas (weird and non-weird)',
- 'Write down 3 things I am grateful for',
-);
-
-my $habit = $habits[rand @habits];
-my $cow = Acme::Cow->new;
-$cow->text($habit);
-int(rand 2) ? $cow->say : $cow->think;
-$cow->print;