#!/bin/env perl
# ABSTRACT: Make sure all modules required by Nextcloud are installed for a PHP versoin
# PODNAME: install_nextcloud_php_mods

use strict;
use utf8;
use warnings qw( all );
use Modern::Perl;
use File::Basename;

use FindBin;
use Cwd qw/realpath/;
use lib "$FindBin::Bin/../lib";

use Getopt::Long;
use Pod::Usage;

# VERSION 0.1

=head1 SYNOPSIS

   install_nextcloud_php_mods.pl phpversion

=head1 DESCRIPTION

   Attempts to install a list of modules needed by Nextcloud for the given PHP version. PHP version is in the form of php8.0

=cut

GetOptions(
    q(help)             => \my $help,
    q(verbose)          => \my $verbose,
) or pod2usage(q(-verbose) => 1);
pod2usage(q(-verbose) => 1) if $help;

die "PHP versoin required\nUsage: $0 filename(s) \n" unless ( @ARGV );
# \N is null
my $php_version = @ARGV;

# Standard defense against hung script
my ($timeout, $size, $buffer) = (5, 0, undef);
my $nread = undef;
eval {
    local $SIG{ALRM} = sub { die "alarm\n" }; #\n required
    alarm $timeout;
    $nread = sysread STDIN, $buffer, $size;
    alarm 0;
};
if ($@) {
   print "Script timed out, check the command\n";
    die "Script timed out" unless $@ eq "alarm\n";   # propagate unexpected errors
}

# Script goes here