Not very sexy, but it some may find it useful.

The following code was tested on Window 11 using the 64-bit version of strawberry 5.30.3. It was assembled by extracting the relevant bits from the Win32::FileOp module and making a simple change to account for the fact that I am using a 64-bit version of perl. 

use strict;
use warnings;

use Win32::API;

sub FO_DELETE          () { 0x03 }
sub FOF_SILENT         () { 0x0004 } # don't create progress/report
sub FOF_NOCONFIRMATION () { 0x0010 } # Don't prompt the user.
sub FOF_ALLOWUNDO      () { 0x0040 } # recycle bin instead of delete
sub FOF_NOERRORUI      () { 0x0400 } # don't put up error UI

sub Recycle 
{
  # a series of null-terminated pathnames, with a double null at the e
+nd
  my $paths = join "\0", @_, "\0";
    
  my $recycle = new Win32::API('shell32', 'SHFileOperation', 'P', 'I')
+;
  my $options = FOF_ALLOWUNDO | FOF_NOCONFIRMATION | FOF_SILENT | FOF_
+NOERRORUI;
    
  # for everything except paths and options, pack with Q (rather than 
+L), since we're using 64-bit perl
  # my $opstruct = pack ('LLpLILLL', 0, FO_DELETE, $paths, 0, $options
+, 0, 0, 0);
  my $opstruct = pack ('QQpQIQQQ', 0, FO_DELETE, $paths, 0, $options, 
+0, 0, 0);

  return $recycle->Call($opstruct);
}

my $file = "C:\\Users\\James\\fish";
my $rc = Recycle($file);

print "RC: $rc\n";

[download]

Return codes are described here:

https://learn.microsoft.com/en-us/windows/win32/debug/system-error-codes--0-499-

In reply to Sending items to the windows recycle bin by CrashBlossom

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.