use warnings;
use strict;

open $my file, '<', "C:/reboot_attempts";

read $file, my $reboot_number, 1;

if ($reboot_number == 0){
    open my $file, '>', 'reboot_attempts';
    print $file '1';
    close $file;
    #reboot machine;
}
if ($reboot_number == 1){
    open my $file, '>', 'reboot_attempts';
    print $file '2';
    close $file;
    #reboot machine;
}
if ($reboot_number == 2){
    open my $file, '>', 'reboot_attempts';
    print $file '3';
    close $file;
    #reboot machine;
}
if ($reboot_number == 3){
    open my $file, '>', 'reboot_attempts';
    print $file '4';
    close $file;
    #reboot machine;
}
if ($reboot_number == 4){
    open my $file, '>', 'reboot_attempts';
    print $file '5';
    close $file;
    #reboot machine;
}
if ($reboot_number == 5){
    open my $file, '>', 'reboot_attempts';
    print $file '0';
    #exit;
}