#!C:\strawberry\perl\bin\perl.exe

use strict;
use warnings;
use Inline:: Files;
use Inline::AWK;

awk(); 
    
__END__
__AWK__
    
BEGIN { print "Hello, world!" }