Failed to initialize Macports

[awil1026.1090@…]

My port command does not function at all. Here is the output i get when using s simple port command:

%% sudo port 
error reading "file6": illegal operation on a directory
    while executing
"gets $f"
    (procedure "auto_load_index" line 23)
    invoked from within
"auto_load_index"
    (procedure "auto_load" line 30)
    invoked from within
"auto_load $name [uplevel 1 {::namespace current}]"
    (autoloading "::tcl::tm::UnknownHandler")
    (procedure "::unknown" line 30)
    invoked from within
"::tcl::tm::UnknownHandler  {::tcl::MacOSXPkgUnknown ::tclPkgUnknown} msgcat 0-"
    ("package unknown" script)
    invoked from within
"package require msgcat"
    (file "/opt/local/share/macports/Tcl/registry2.0/registry.tcl" line 40)
    invoked from within
"source /opt/local/share/macports/Tcl/registry2.0/registry.tcl"
    ("package ifneeded registry 1.0" script)
    invoked from within
"package require registry 1.0"
    (procedure "mportinit" line 444)
    invoked from within
"mportinit ui_options global_options global_variations"
Error: /opt/local/bin/port: Failed to initialize MacPorts, error reading "file6": illegal operation on a directory

I've searched the for a fix, but can't find anything

[neverpanic (Clemens Lang)]

Please use WikiFormatting when posting in Trac.

I'm not sure why auto_load_index is trying to read a directory named file6 from some path where it probably shouldn't be, but I think the error might also be occurring because of Tcl 8.6. Please provide the output of

head -n4 /opt/local/bin/port
echo 'puts [info patchlevel]' | /usr/bin/tclsh