Select Code to Download

my $filename = "screenshot.png";
$driver->capture_screenshot($filename);

my $path = "C:/Users/user1/Documents/TESTPERL";
$driver->capture_screenshot("$path/Website-$url.png");

C:\Users\user1\Documents\TESTPERL>perl TEST7.pl
Processing https://www.tricentis.com/
...
Processing https://github.com/mozilla/geckodriver/releases
binmode() on closed filehandle $fh at C:/Strawberry/perl/site/lib/Sele
+nium/Remote/Driver.pm line 1014.
print() on closed filehandle $fh at C:/Strawberry/perl/site/lib/Seleni
+um/Remote/Driver.pm line 1015.

#!/usr/bin/perl
use strict;
...
    $driver->capture_screenshot("$path/Website-$url.png");
    $driver->pause(2000);
}