From 776578da2ee95f60e3215b34059bcb45105e8046 Mon Sep 17 00:00:00 2001 From: silverwizard Date: Wed, 20 Nov 2019 14:00:33 -0500 Subject: [PATCH] Migrated to not use the fairly old and out of date notwhoami and moved to Data::Faker --- Paranoia | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/Paranoia b/Paranoia index 8ba3672..a80b44d 100755 --- a/Paranoia +++ b/Paranoia @@ -5,7 +5,10 @@ use POSIX; use PDF::API2; use PDF::Table; use List::Util 'shuffle'; +use Data::Faker; +my $faker = Data::Faker->new(); + generate(); sub generate { @@ -172,8 +175,8 @@ sub roll{ } sub name{ - my $n = `notwhoami|head -n1|cut -d' ' -f1`; - chomp $n; + my $n = $faker->name; + $n =~ s/ .*//; return $n; }